Tipps & Tricks
02.11.2002, 17:30 Uhr
Dateiname in einer Zelle ausgeben II
Mit welcher Formel kann ich den Dateinamen in einer Zelle ausgeben?
Eine weitere Möglichkeit, zusätzlich zum kürzlich veröffentlichten Artikel zu diesem Thema [1], ist Folgende:
Erstellen Sie ihre eigene Funktion, die Sie dann wie eine ganz normale Formel verwenden können.
Um diese Funktion zu erstellen, öffnen Sie den Visual Basic Editor über EXTRAS/MAKRO/Visual Basic Editor. Falls noch kein Modul vorhanden ist, fügen Sie ein neues hinzu und tragen dort folgenden Text im Codefenster auf der rechten Seite ein:
Function Dateiname()
Blattname = Application.ActiveWorkbook.Name
End Function
Schliessen Sie nun den Visual Basic Editor und aktivieren Sie die Zelle, in welcher Sie den Dateinamen ausgeben möchten. Klicken Sie auf "fx" neben der Formelzeile, um den Funktionsassistenten aufzurufen. Die soeben erstellte Funktion "Dateiname" finden Sie unter "Benutzerdefiniert".
Doppelklicken Sie die Funktion und klicken Sie auf OK. Diese Funktion benötigt keine weiteren Argumente.
Noch einfacher, als über den Funktionsassistenten, fügen Sie die Formel wie folgt ein direkt in der Zelle mit "=Dateiname()" ein.
Kommentare
Es sind keine Kommentare vorhanden.
