VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Dateiname aus dem vollen Namen extrahieren

Gruppe

Datei

Bereich

Name

Thema

Dateiname aus dem vollen Namen extrahieren

Problem

Mit der GetOpenFileName-Methode kann ich den Datei- mit dem Pfadnamen abrufen. Wie kann ich aus dieser Zeichenfolge den Dateinamen filtern?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




StandardModule: basMain

Sub FileFilter()
   Dim vFile As Variant
   vFile = Application.GetOpenFilename
   If vFile = False Then Exit Sub
   vFile = Dir(vFile)
   MsgBox vFile
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen Datei und Name