Hirdetés
- Projektor topic
- Milyen egeret válasszak?
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- ASUS notebook topic
- AMD Ryzen 9 / 7 / 5 / 3 5***(X) "Zen 3" (AM4)
- TCL LCD és LED TV-k
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Gaming notebook topik
- Mini-ITX
- Milyen billentyűzetet vegyek?
-
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
-
Cuci3
tag
Csak úgy érdeklődésképpen kérdezném meg, hogy ki tudja, mi a fene volt a VBA-val a következő szituban?
Egy egyszerű progi (supported by Delila - thanks a lot
):Sub ell()
Const utvonal = "\\Dbinfo\strategia\faktoring elemzés\dfakto - pénzügyi kimutatás\"
Dim FN, alap, valtozo As String
ChDir utvonal
FN = Dir(utvonal & "*.xls", vbNormal)
Do
If FN <> "." And FN <> ".." Then
Workbooks.Open Filename:=FN
ActiveWindow.Close
End If
FN = Dir()
Loop Until FN = ""
End SubEgyész nap frankón fut, majd így nap végére kicsit megfárad, és azt dobja nekem, hogy "Run Time Error - 1004", illetve nem tudja megnyitni a fájlt. Pislogás, nézelődés, de semmi. Gép újraindít, kód átmásolása más excelbe - még mindig hibaüzi fogad.
Majd excelben VBA rögzítéssel nyitok egy fájlt, rögzítés leállít, bezárom - és láss csodát működik a kód.
Tud valaki erre értelmes magyarázatot adni? (Legutóbbi fájlok listája végig 0)
Ú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!
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Eladó Steam kulcsok kedvező áron!
- MS SQL Server 2016, 2017, 2019
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Keresünk Galaxy S23/S23+/S23 Ultra/S23 FE
- Skull&Co. kemény tok Asus ROG Ally és Ally X gépekhez
- HIBÁTLAN iPhone 15 Plus 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS4504
- Lenovo Thinkpad T14 Gen 3, 1 Év Garanciával
- Akció! HP ZBook Firefly 14 i7-1165G7 16GB 512GB Nvidia Quadro T500 4GB 14" FHD 1 év garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
):

Fferi50

