Hirdetés

Új hozzászólás Aktív témák

  • Fferi50

    Topikgazda

    válasz p5quser #40632 üzenetére

    Szia!

    "Ha az stnm helyére beírom idézőjelekkel az adat file teljes nevét kiterjesztéssel, teszi a dolgát"

    Mit értesz teljes név alatt? Ha csak a kiterjesztéssel bővített fájlnevet, akkor rendben van. Ha viszont az elérési utat (Path) is beleérted, akkor nem működhet rendesen.
    Megnyitott munkafüzetre a fájlnévvel (Name) lehet/kell hivatkozni, igen, kiterjesztéssel együtt.
    Viszont itt:
    If stnm <> "" Then
    Workbooks.Open stnm
    End If

    Az stnm a Path-t is fogja tartalmazni, ezért jelentkezik hiba az adott sorban.
    Ebből az alábbi sorral kaphatod meg a fájl nevét:
    fnev=Mid(stnm,InStrRev(stnm,"\")+1)

    Még egy megjegyzés: Amikor megnyitod az stnm nevű munkafüzetet, az lesz az aktív munkafüzet, tehát a nevét az ActiveWorkbook.Name tulajdonsággal is lekérdezheted.

    Üdv.

Új hozzászólás Aktív témák