Abrufen eines Dateinamens (Microsoft Excel)
Wenn Sie ein VBA-Makro in Excel schreiben, müssen Sie dem Benutzer möglicherweise erlauben, eine gewünschte Datei von der Festplatte anzugeben. Glücklicherweise können Sie in VBA auf das Standarddialogfeld Öffnen zugreifen und nur einen Dateinamen zurückgeben. Die folgende Beispielunterroutine zeigt, wie dies gemacht wird:
Sub GetFName() Dim FName As Variant Dim Msg As String FName = Application.GetOpenFilename() If FName <> False Then Msg = "You chose " & FName MsgBox Msg Else 'Cancel was pressed End If End Sub
Wenn Sie dieses Makro ausführen, wird das in Excel verwendete Standarddialogfeld Öffnen angezeigt. Der Benutzer kann eine Datei auswählen. Wenn er auf Öffnen klickt, wird der Dateiname (einschließlich des vollständigen Pfads) der Variablen FName zugewiesen.
Wenn der Benutzer auf die Schaltfläche Abbrechen klickt, wird FName auf False gesetzt. (Also der Test dafür im Code.)
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.
Dieser Tipp (2272) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier: