Laufzeitfehler 76 Pfad nicht gefunden
28.11.2016 13:06:10
Peter
wenn ich folgendes Makro aufrufe kommt Laufzeitfehler 76 Pfad nicht gefunden
auch wenn Datei richtig geöffnet wird:
Sub Folgekonto_Basis_öffnen()
Dim pfad As String, wbDatei1 As String ', TPfad1 As String
pfad = Worksheets("Anfang und Enddatum").Range("AN11") & "\" & Worksheets("Anfang und Enddatum") _
.Range("AH2") & "\" '& Worksheets("Anfang und Enddatum").Range("AL2") & "\"
Debug.Print pfad
wbDatei1 = Worksheets("Anfang und Enddatum").Range("AP2")
Debug.Print wbDatei1
Debug.Print pfad & wbDatei1
Workbooks.Open Filename:=pfad & wbDatei1
Call Ordner_Dateien_auflisten
Call Dateien_auflisten
End Sub
Was muss ich ändern, damit der Fehler beseitigt ist?Besten Dank für Eure Hilfe.
Gruss
Peter