- MasterDeeJay: RAM gondolatok: Mennyi a minimum? DDR3 is jó?
- Brogyi: CTEK akkumulátor töltő és másolatai
- gban: Ingyen kellene, de tegnapra
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Rabbitf_24: A nagy életmódváltás.
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- D@reeo: Pi-hole és a Telekom Sagemcom F@st 5670 DNS beállítása
- MasterDeeJay: Comet lake (10gen) és DDR3 - mert ilyet is lehet!
- Luck Dragon: Asszociációs játék. :)
- ldave: New Game Blitz - 2026
-
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
tgumis
#42394
üzenetére
Szia!
A Windows helyett én a Workbooks -ot használnám, az jelöli ki egyértelműen a munkafüzetet. (Tudom, a makrórögzítés a Windowst használja
)
Bevezetnék változókat a munkafüzetekre.
Gondolom ahova másolni kell, azt a munkafüzetet a felhasználó választja ki és nyitja meg.
Nos a megnyitáskor ezt a munkafüzetet hozzárendelném pl. egy celfuzet nevű változóhoz. A továbbiakban pedig ezt használnám hivatkozásként.
pl.Set celfuzet =ActiveWorkbook '(mivel megnyitás után az új füzet lesz aktív)
A copy után meg lehet adni közvetlenül a másolás helyét, ha mindent másolsz.
pl.Range(Range("A2"),Range("K2").End(xlDown)).Copy Destination:=celfuzet.sheets(1).Range("Anyagbiz[Anyagbiz-szám]")
A munkafüzet mellett meg kell adni a munkalapot is(!), akkor is, ha csak egy munkalap van benne.Üdv.
Új hozzászólás Aktív témák
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- MS SQL Server 2016, 2017, 2019
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- ÁRGARANCIA!Épített KomPhone Ryzen 7 9800X3D 32/64GB RAM RTX 5070Ti 16GB GAMER PC termékbeszámítással
- LENOVO GAMER BAZÁR - új lista (2026.02.23)
- BESZÁMÍTÁS! Asus H510M R5 5600X 16GB DDR4 512GB SSD RTX 3070 8GB Rampage SHIVA GIGABYTE 750W
- Eladó Samsung Galaxy A16 4/128GB fekete / kijelző alsó része hibás / 12 hó jótállás
- BESZÁMÍTÁS! ASUS B150M i5 7500 8GB DDR4 256GB SSD GTX 1050Ti 4GB Nbase Black Midi DeepCool 400W
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
)
Fferi50