probleme de syntaxe

[goldfinger13]

Bonjour à tous,
besoin de votre aide pour simplifier mon code. Je souhaite remplacer dans x et y le cheminement par la variable chemin mais je bloque sur la syntaxe

Dim fso As Object, y, z As Boolean
Dim chemin As Variant
chemin = "N:\documents\"
Set fso = CreateObject("Scripting.FileSystemObject")
y = fso.FileExists("N:documents\toto.xls")  'c'est par ici que je bloque
z = fso.FileExists("N:\documents\tata.xls") ' et donc là aussi

merci d'avance pour votre aide

 

[A l l i g a t o r 427]

Re : probleme de syntaxe

Hello

Ce devrait être OK, non ?
(Attention à tes Dim ...)

Dim fso As Object, y, z As Boolean
Dim chemin As Variant
chemin = "N:\documents\"
Set fso = CreateObject("Scripting.FileSystemObject")
y = fso.FileExists(chemin & "toto.xls")  'c'est par ici que je bloque
z = fso.FileExists(chemin & "tata.xls") ' et donc là aussi

Dim fso
Dim y As Boolean
Dim z As Boolean
Dim chemin As String

seraient pour moi de meilleures Dim.

 

[goldfinger13]

Re : probleme de syntaxe

merci alligator ça fonctionne et j'ai rectifié mes dim