Dateiname in Textfeld mit Datei Explorer
13.03.2013 14:01:24
Marc
ich habe eine Routine gefunden, mit der ich den Pfad in ein Textfeld eintragen kann, in dem _ Textfeld soll aber nicht der Pfad, sondern nur der Dateiname, also z.b: nicht c:\temp\test.txt, sondern nur text.txt stehen:
Private Sub CommandButton3_Click()
Dim strPfad As String
With Application.FileDialog(msoFileDialogFilePicker)
.title = "Bitte Datei wählen"
.Filters.Clear
If .Show = -1 Then
strPfad = .SelectedItems(1)
End If
End With
Bild2.Value = strPfad
End Sub
Kann mir jemand helfen?
Danke und Gruß
Marc
Anzeige