Hirdetés

Ú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 :R ):

    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 Sub

    Egyé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. :W
    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. :Y
    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