deni29

[deni29]

Bonjour à tous,

En lancant une macro, je souhaiterai savoir si un fichier nommé 'xxxx.xls' existe dans un dossier 'YYYY'.

@+

Deni29

 

[Hervé]

bonjour deni

peut etre comme ceci :

Dim toto

Set toto = CreateObject('Scripting.FileSystemObject')

If toto.FileExists('c:\\\\\\\\yyyy\\\\\\\\xxxx.xls') Then
MsgBox 'fichier existant.'
Else
MsgBox 'fichier non existant.'
End If

salut

Message édité par: hervé, à: 25/04/2006 14:29

 

[Deni29]

Existance d'un Fichier

Bonjour Hervé,

Merci pour cette solution, cela fonctionne trés bien.

@+

deni29

 

[Deni29]

Existance d'un Fichier

Bonjour Hervé,

Merci pour cette solution, cela fonctionne trés bien.

@+

deni29