Hirdetés
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Luck Dragon: Asszociációs játék. :)
- Andras-G: Az internet veszélyei [2. rész] - Facebook Marketpalce
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- mefistofeles: Az elhízás nem akaratgyengeség! 2 Ahogy én csinálom.......
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- ldave: New Game Blitz - 2026
- gban: Ingyen kellene, de tegnapra
- Geri Bátyó: Ezt pedig azért, mert...
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Fferi50
Topikgazda
válasz
alfa20
#35979
üzenetére
Szia!
Ilyen esetben a "háromdimenziós" változó megadásra van szükség, meg kell mondani a makróban, melyik modulban van a változó.
A megoldás:Private Sub start()
ThisWorkbook.makroFileWB.Sheets(1).Range("A1") = "1000"
End SubIgen, kicsit bizarrnak hat, hiszen a makroFileWB változó tartalma a ThisWorkbook objektum, viszont magát a változót a ThisWorkbook. modulban deklaráltad.
Másrészt ne felejtsük el azt sem, hogy a ThisWorkbook objektum és az ActiveWorkbook objektum nem feltétlenül ugyanarra a munkafüzetre hivatkozik...bár alapból gondolhatnánk akár ezt is.
A ThisWorkbook mindig a makrót elindító munkafüzet lesz, az ActiveWorkbook pedig, mint a neve is mutatja, az éppen aktív munkafüzet.
Azt javaslom, hogy globál/publikus változókat mindig általános modulban deklarálj és a modulnévvel így könnyen tudsz rá hivatkozni: modulnév.változónévJavaslom, nézd át a változók élettartama és hatóköre részt a VBA helpben.
Üdv.
Új hozzászólás Aktív témák
- Abarth, Alfa Romeo, Fiat, Lancia topik
- Huawei Watch GT 6 és GT 6 Pro duplateszt
- Milyen egeret válasszak?
- Formula-1
- One otthoni szolgáltatások (TV, internet, telefon)
- Mégis meglepi egy új GeForce-szal a rajongókat az NVIDIA?
- Forza sorozat (Horizon/Motorsport)
- Borderlands 4
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Melyik tápegységet vegyem?
- További aktív témák...
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- MS SQL Server 2016, 2017, 2019
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Apple iPhone 12 64GB, Kártyafüggetlen, 1 Év Garanciával
- Honor Pad 8 / 6/128GB / Wi-fi / 12Hó Garancia
- ÁRGARANCIA!Épített KomPhone Ryzen 5 9600X 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- Beszámítás! LG UltraGear 27GL850 144Hz QHD IPS 1ms monitor garanciával hibátlan működéssel
- ÁRGARANCIA! Épített KomPhone i7 14700KF 32/64GB RAM RTX 5090 32GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50