ich versuche mich an einem Makro, dass es mir erlaubt, eine neue Excel Datei aus einem Pfad zu öffnen.
Das Fenster zur Dateiauswahl öffnet sich auch und ich kann eine Datei auswählen. Wenn ich dann aber auf "Öffnen" drücke, passiert nichts. Die Datei öffnet sich nicht.
Folgender Code wird verwendet:
Private Sub CommandButton1_Click()
Dim strPfad As Variant
strPfad = Application.GetOpenFilename
If strPfad False Then
TextBox1 = strPfad
Else
MsgBox "Nichts ausgewählt!"
End If
End Sub
Vielen Dank!