-
Fototrend
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
Szia!
Akkor félreértettél:
"File = Pathname & "\" & Filename & "\*.xlsx"
Workbooks(File).Worksheets("Target").Cells(1, 1)"
Itt a File változó a teljes nevet tartalmazza. Ezt nem szereti ebben a pozícióban az Excel VBA, ide elég a Filename (amiben a kiterjesztés is benne van, legalábbis 2010-ig biztosan.
Viszont most látom: A Filename & "\*.xlsx" -ben miért is van benne a backslash? , illetve így a File fogja tartalmazni a * karaktert, ami aztán végképp nem szerepelhet a fájlnévben.
Szóval úgy néz ki, több sebből vérzik az elképzelés."Mondjuk az nem működhetne, hogy Workbooks(Dir(Source_file)).Worksheets?" Szerintem túlbonyolítod a dolgot, a Source_file is teljes, path-t is tartalmazó név, ezért nem felel meg. Másrészt, ha már megnyitottad, akkor csak a rövid név müxik.
Megnyitás nélkül pedig nem kell a Workbooks, csak a teljes fájlnév szögletes zárójelben, aposztróffal kezdve a több tag lehetősége miatt, utána a munkalap neve, aposztróf bezárva felkiáltójel cellacím.Üdv.
Új hozzászólás Aktív témák
- A fociról könnyedén, egy baráti társaságban
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Napelem
- Kedvenc zene a mai napra
- Androidos fejegységek
- Kínai és egyéb olcsó órák topikja
- Philips LCD és LED TV-k
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Amlogic S905, S912 processzoros készülékek
- Gitáros topic
- További aktív témák...
- AKCIÓ! Acer Predator Helios Neo 16 PHN16 notebook-i9 13900HX 16GB DDR5 1TB SSD RTX 4060 8GB W11
- Xiaomi Mi 11i 256GB, Kártyafüggetlen, 1 Év Garanciával
- 27% - ACEmagic S3A MiniPC! Ryzen 6900HX 16GB DDR5 / 512GB SSD/ Radeon 680M!
- 27% - MSI MAG 27C6F Monitor! 1920x1080 / 0.5ms / 180Hz / FreeSync
- GAMER PC! Ryzen 7800X3D / RTX 5070 Ti / 32GB DDR5 / 1TB NVMe / 860w Platinum!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50