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

• #40633 Fferi50 Topikgazda p5quser #40632

  Új Válasz 2019-04-03 12:11:08 #40633

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  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