Hirdetés
- CES 2026: valóságos képkockagenerálók lesznek a modernebb GeForce-ok tavasszal
- CES 2026: Visszatér a legjobb Expertbook
- CES 2026: A legjobb volt, az is marad? Itt a Zenbook A14 második generációja
- CES 2026: akár játszhatunk is az Acer RGB lézerprojektorával
- Iterálunk, iterálunk? DeepCool AK700 Digital processzorhűtő
- RTX 4070 SUPER / micro lagg / nincs kihasználva 55-60% futás
- A legrosszabb CPU-k – az ExtremeTech szerint
- Mini-ITX
- Sony MILC fényképezőgépcsalád
- CES 2026: Teljesen szürreális lett az ASUS asztali gamer PC-je
- Gaming notebook topik
- Házimozi haladó szinten
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- CES 2026: valóságos képkockagenerálók lesznek a modernebb GeForce-ok tavasszal
- TCL LCD és LED TV-k
-
PROHARDVER!
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
-
válasz
Fferi50
#52829
üzenetére
Szia,
Köszi a segítséget

Akkor így nézne ki teljes egészében ?fnev=dir("F:\123\*.xlsx")do while fnev<>""műveletekfnev=dir()loopSub Masolas()
Dim i As Integer
Dim Cel_Ws As String
Cel_Ws = "CélMunkafüzetNeve"
For i = 1 To Sheets("Seged").Range("D3").Value
Workbooks(Sheets("Seged").Cells(i, 1).Value).Sheets(Cel_Ws).Range("D4").Value = Sheets("Seged").Range("D1").Value
Workbooks(Sheets("Seged").Cells(i, 1).Value).Sheets(Cel_Ws).Range("E4").Value = Sheets("Seged").Range("D2").Value
Next
MsgBox "Kész."
End Sub#52830 Fferi50
Köszönöm, ez is jónak tűnik, de amit belinkelt Delila az nagyon jó.#52832 Delila_1
Nagyon szépen köszönöm, ez óriási segítség, csak be kell helyettesítenem és átmásolnom mindenestől. Hálás köszönet még1x
-
válasz
föccer
#52826
üzenetére
Köszi a gyors választ
Ezt meg tudnám úgy csinálni, hogy ne keljen munkafüzet neveket megadnom, hanem tegyük fel, hogy az F:\123\ mappából az összes fájlt (talán .*xlsx ) nyissa meg és hajtsa végre a módosítást ugyanazokon a cellákon? Munkalap nevek ugyanazok mindenhol, csak a munkafüzet, vagyis fájlnevek változnak.
A másodikra nincs tipped?
-
Sziasztok,
Excel 2019-et használok és olyat szeretnék megvalósítani, hogy megnyitok pl. 15 munkafüzetet és tegyük fel, hogy a D4 és E4 cellákba ugyanazt az adatot akarom beírni minda 15 munkafüzetben amely teljesen egyforma. Hogyan tudom ezt egyszerűen egy makróval? Előre is köszönöm a segítséget
Még egy dolog eszembe jutott és ezt már régóta próbálom, de nem jöttem rá eddig hogyan csináljam, szóval legördülő menüből szeretnék képet kiválasztani (logo), de adatérvényesítésnél nem láttam olyat, hogy a kép fájlt milyen formátumban, vagy hogyan rendeljem esetleg egy cellához és akkor azt hivatkozzam be az adatsorhoz.
Legördülőből szeretnék kiválasztani autómárka logókat pontosabban. Köszönöm
-
Nyomtatási problémával találkoztam, de elég fura a jelenség, mert ha pl. tesztoldalt nyomtatok akkor minden ok, vagy ha pl. chrome, ill. adobe-ból nyomtatok akkor is minden ok, de az Excel / Word párosnál sajnos minden alkalommal elakad a nyomtató elérésénél és kifagy egy idő után. Valahol a beállításoknál kellene valami babrálni, vagy mi okozhatja ezt a gondot? Nagyon idegesítő a jelenség és fogalmam sincs mi okozhatja... Köszönöm

-
Új hozzászólás Aktív témák
- Motorola G86 - majdnem Edge
- alza vélemények - tapasztalatok
- Titkos szabállyal tereli a hazai megoldások felé a félvezetőgyártóit Kína
- Witcher topik
- Kuponkunyeráló
- Arch Linux
- RTX 4070 SUPER / micro lagg / nincs kihasználva 55-60% futás
- Milyen NAS-t vegyek?
- XPEnology
- ASZTALI GÉP / ALKATRÉSZ beárazás
- További aktív témák...
- AKCIÓ! ASUS ROG G16 (2025) G615LR 16 - Ultra 9 275HX 32GB DDR5 1TB SSD RTX 5070Ti 12GB WIN11
- LG 25GR75FG - E-Sport Monitor - FHD 360Hz 1ms - NVIDIA Reflex + G-sync - AMD FreeSync - HDR 400
- 134 - Lenovo Legion Pro 7 (16IRX8H) - Intel Core i9-13900HX, RTX 4090 - 3 év garancia
- CSX 2x2GB (4GB) DDR2 800 MHz kit
- Apple iPhone 13 / 256GB / Kártyafüggetlen / 12Hó Garancia / Akku:100%
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest




