Herbers Excel-Forum - das Archiv

Dateinamen abfragen



Excel-Version: 97
nach unten

Betrifft: Dateinamen abfragen
von: Michael


Geschrieben am: 26.04.2002 - 08:13:06

Hallo Forum,

ich möchte mit folgendem Code abfragen, ob der Dateiname
"Abfrage Fußzeile" ist.

Leider geht es nicht.

Kann mir jemand sagen, was ich falsch mache?

If ActiveSheet.Name = "C:\Programme\Microsoft Office\Office\XLStart\Abfrage Fußzeile" Then
MsgBox "erkannt"
Exit Sub
End If

Vielen Dank im voraus,

Michael

nach oben   nach unten

Re: Dateinamen abfragen
von: Thomas N


Geschrieben am: 26.04.2002 - 08:26:50

Du darfst nicht ActiveSheet nehmen, sondern ActiveWorkbook! Ausserdem funktioniert es nicht, wenn der Pfad davor steht! Dies müsste extra geprüft werden oder halt gleich die FullName-Eigenschaft genohmen werden Also: If ActiveWorkbook.FullName = "Mappe1" Then _ MsgBox "Richtig"

nach oben   nach unten

Re: Dateinamen abfragen
von: Michael
Geschrieben am: 26.04.2002 - 10:01:47

Hallo Thomas, vielen Dank. Jetzt funktioniert es. Gruß Michael

 nach oben

Excel-Beispiele zum Thema "Dateinamen abfragen"
Dateinamen filtern Dateinamen in Listbox
Dateinamen in Tabelle einlesen Dateinamen eines Verzeichnisses als HTML-Datei
Grafik nach Eingabe des Dateinamens einfügen Dateinamen in TabStrip-Elemente einlesen
Datei entsprechend der Eingabe des Dateinamens öffnen Dateinamen in UserForm-ComboBox einlesen und Datei öffnen
Grafik-Dateinamen aus Zelle auslesen und HTML-Datei erstellen Dateiauswahl-Dialog mit vorgegebenen Dateinamen aufrufen