Dateinamen abfragen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
MsgBox


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

Beiträge aus den Excel-Beispielen zum Thema "Dateinamen abfragen"