A07: Dir-Funktion... Abbruch, wenn kein Ergebnis ?

15/12/2009 - 09:40 von Steffen Brose | Report spam
Hallo Allseits,
ich habe mal eine Anfrage zur Dir-Funktion:

Mit:

SucheInVerzeichnisDatei = EReVerzeichnis & [SucheInVerzeichnisDatei] & "*" &
".pdf"
EGefunden = Dir(SucheInVerzeichnisDatei)
SucheInVerzeichnisDatei = EReVerzeichnis & EGefunden
Application.FollowHyperlink SucheInVerzeichnisDatei


suche ich - besser: VB - im Verzeichnis nach einer Datei.

Die Frage:

Wenn die Suche erfolglos war kommt aber immer das FileDialogFenster.
Làsst sich dies bei negativen Ergebnis'abschalten' ?

Meine 'Versuche' mit
if isNull usw. oder auch if iserror usw. scheiterten 'klàglich'...

Danke für Eure Hilfe - Gruss Steffen
 

Lesen sie die antworten

#1 Jens Schilling
15/12/2009 - 09:57 | Warnen spam
Hallo, Steffen

Steffen Brose wrote:
Mit:
SucheInVerzeichnisDatei = EReVerzeichnis & [SucheInVerzeichnisDatei]
& "*" & ".pdf"
EGefunden = Dir(SucheInVerzeichnisDatei)
SucheInVerzeichnisDatei = EReVerzeichnis & EGefunden
Application.FollowHyperlink SucheInVerzeichnisDatei


suche ich - besser: VB - im Verzeichnis nach einer Datei.

Die Frage:

Wenn die Suche erfolglos war kommt aber immer das FileDialogFenster.
Làsst sich dies bei negativen Ergebnis'abschalten' ?

Meine 'Versuche' mit
if isNull usw. oder auch if iserror usw. scheiterten 'klàglich'...



Prüfe die Lànge des Strings, etwas so:

len(Dir(SucheInVerzeichnisDatei)) > 0


Gruss
Jens

FAQ: http://www.donkarl.com

Ähnliche fragen