Hirdetés
- Parci: Milyen mosógépet vegyek?
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Geri Bátyó: Agglegénykonyha 13 – Néhány egyszerű, de finom étel
- eBay-es kütyük kis pénzért
- Geri Bátyó: Agglegénykonyha 14 – Kések, késélezés
- talmida: Változások 2. rész
- Luck Dragon: MárkaLánc
-
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
-
bteebi
veterán
Sziasztok!
Van egy makróm, aminek a segítségével egy adott xls file-ba (ami eredetileg a makrót tartalmazta) egy text file-ból (amit dialógusablakban kérek be) adatokat olvasok be. Ezt úgy oldottam meg, hogy az Excel file-ra így hivatkozok:
Set cel = ThisWorkbook.ActiveSheet
A Workbooks.OpenText-tel megnyitott text file-ra pedig így:
Set forras = ActiveWorkbook.Sheets(1)
Mivel elég sok Excel file-nál kellene használni ezt a makrót, és hogy ne kelljen mindig bemásolni a makrót az adott file-ba, ezért az egyéni makró munkafüzetben (personal.xlsb) szeretném használni. Ezzel viszont az a baj, hogy a Set cel = ThisWorkbook.ActiveSheet értelemszerűen nem fog működni, mivel akkor a ThisWorkbook az egyéni makró munkafüzet, nem pedig az a file, amibe szeretném az adatokat bemásolni. Van valamilyen ötletetek ennek a megkerülésére?
Előre is köszönöm a javaslatokat! 
Új hozzászólás Aktív témák
- Xiaomi 17 Ultra - jó az optikája
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- Folyószámla, bankszámla, bankváltás, külföldi kártyahasználat
- Docker konténerizálás
- Gumi és felni topik
- Formula-1
- Diablo IV
- Világrekordot ünnepel az ASRock
- Milyen billentyűzetet vegyek?
- PlayStation 5
- További aktív témák...
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Fallout 4 Pip-Boy Edition eladó
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- BESZÁMÍTÁS! ASUS X670E R7 9800X3D 32GB DDR5 1TB SSD RTX 4080 16GB Lian Li O11 Dynamic EVO RGB 850W
- OPPO Find X9 Pro Titanium Charcoal 512GB használt karcmentes 6 hónap garancia
- Telefon felvásárlás!! Samsung Galaxy A22/Samsung Galaxy A23/Samsung Galaxy A25/Samsung Galaxy A05s
- BESZÁMÍTÁS! ASRock B650 R7 8700F 32GB DDR5 1TB SSD RTX 3080 10GB LIAN LI LANCOOL 217 fehér 750W
- AKCIÓ! Dell Precision 3571 4G LTE i7-12700H 32GB 1000GB FHD RTX A1000 4GB 1 év teljeskörű garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Előre is köszönöm a javaslatokat! 
Fferi50