variabler Pfad in vba
05.03.2019 23:12:40
G.Lang
im Moment bin ich ratlos.
Wie bekomme ich es hin, dass der feste Pfad siehe vba ("f:\test\") zu einem variablen Pfad wird?
Der Pfad sollte aus der Zelle T17 (z.B. f:\test\)herangezogen werden. Dort kann man dann händisch einen Pfad vergeben oder auch anpassen und muss nicht immer im Makro den Pfad anpassen.
Die Zelle T17 wird sich dauernd ändern, deshalb sollte der Pfad variabel sein.
Dies ist mein Codeschnipsel:
Sub makro1()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
MsgBox "Bitte Lieferscheinnummer " & fso.GetFolder("f:\test\").Files.Count + 1 & " _
_
eingeben", 64, "Lieferscheinnummer"
Set fso = Nothing
End Sub