Verifier si un fichier excel existe pour ne pas enregistrer-ecraser

[hassan.zer]

Bonjour je cherche un code sous vba excel pour tester la présence ou non du fichier excel pour ne pas enregistrer-ecraser si celui-ci à déja été enregistré.

Merci.

 

[kjin]

Re : Verifier si un fichier excel existe pour ne pas enregistrer-ecraser

Bonsoir,

Dir("c:\blabla.xls")

...renvoie une chaine de longueur nulle si le fichier n'existe pas
A+
kjin

 

[hassan.zer]

Re : Verifier si un fichier excel existe pour ne pas enregistrer-ecraser

bonsoir,
je ne comprends pas comment faire avec cette commande,
If Dir("c:\blabla.xls") mais aprés je mets quoi ?
merci

 

[hassan.zer]

Re : Verifier si un fichier excel existe pour ne pas enregistrer-ecraser

Merci Kjin,

Ton test donne 0 donc je peux le tester ! merci !!!

 

[kjin]

Re : Verifier si un fichier excel existe pour ne pas enregistrer-ecraser

je ne comprends pas comment faire avec cette commande,

Moi non plus...
Je déconne, mais la réponse me paraissait claire

Dim Fichier$
Fichier = "c:\blabla.xls"
If Dir(Fichier) = "" Then
    ThisWorkbook.SaveAs Fichier
Else
    'quoi fait on ?!
End If

Il suffit de tester la chaîne renvoyée par la variable Fichier
A+
kjin

 

[Staple1600]

Re : Verifier si un fichier excel existe pour ne pas enregistrer-ecraser

Bonsoir

Moi non plus...
Je déconne, mais la réponse me paraissait claire


Par chez moi c'est plutôt

Dim Fichier$
Fichier = "c:\blabla.xls"
If Dir(Fichier) = "" Then
ThisWorkbook.SaveAs Fichier
Else
'qui qu'on fait ?!
End If

Il suffit de tester la chaîne renvoyée par la variable Fichier
A+
kjin

PS:c'était histoire de passer saluer maitre kjin avant d'aller au dodo