title image


Smiley Per FileSystemObject
Hey Joku,



das funktioniert z.B. mit folgender Funktion :



Function DateiExistiert(Dateiname) As Boolean

Set fs = CreateObject("Scripting.FileSystemObject")

DateiExistiert = fs.FileExists(CurDir & "\" & Dateiname)

Set fs = Nothing

End Function



Aufruf : =DateiExistiert("Test.xls")


Grüße, NoNet

  1,2,3 - kleine Excelei :   Infos + Anmeldung zum Jährlichen Exceltreffen



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: