Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Aktiven Dateinamen prüfen

Forumthread: Aktiven Dateinamen prüfen

Aktiven Dateinamen prüfen
30.07.2019 17:52:10
kurt
Guten Tag,
ich möchte gern prüfen ob die geöffnete Datei einen bestimmten
Namen hat, aber mit Platzhalter.
Habe mal dieses probiert, geht aber nicht.
'Orginal: "__Auslastung Verkauf Vers. 12.01.xlsm"
Dim akd As String
akd = "__Auslastung Verkauf*.xlsm"
If Not ActiveWorkbook.Name = akd Then
MsgBox "nicht vorhanden"
Exit Sub
Else
MsgBox "ist ?"
Exit Sub
da es verschiedene Versionen gibt !
mfg
kurt k
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aktiven Dateinamen prüfen
30.07.2019 18:06:27
onur

Dim nam As String
nam = ActiveWorkbook.Name
If Len(nam) > 24 Then
If Left(nam, 20) = "__Auslastung Verkauf" And Right(nam, 5) = ".xlsm" Then MsgBox "ist ?"
Else
MsgBox "nicht vorhanden"
End If

Danke onur ! klappt -)
30.07.2019 18:21:25
kurt
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige