Wie kann man den Standard-Dialog zum Öffnen einer Datei
aufrufen ?
Der Dateiname soll anschließend in einer Variablen
gespeichert werden.
Sub Öffnen()
Dateiname = Application.GetOpenFilename("Textdateien, *.txt,")
If Dateiname <> False Then MsgBox Dateiname
End Sub
|