Gestion d'erreur sur renommage d'un fichier

Bonjour,

Je renomme un fichier avec le code :

Citation:

---

Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.MoveFile NameFichierOrigineComplet, NameFichierModifieComplet

---

Mon souci si le script est déjà passé une première fois, qu'il a déjà renommé mon fichier j'ai une erreur ce qui est normal.

J'aimerai indiquer une condition pour éviter ce souci.

Merci d'avance pour votre aide.

Bonjour.

Un test d’existence du fichier?

Code:

---

1 2	Set objFSO = CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(NameFichierOrigineComplet) Then objFSO.MoveFile NameFichierOrigineComplet, NameFichierModifieComplet

---

Bonnne continuation

Merci pour la réponse.

En fait ce que je voudrais c'est que si NameFichierOrigineComplet existe et que NameFichierModifieComplet n'existe pas alors je fasse le
objFSO.MoveFile NameFichierOrigineComplet, NameFichierModifieComplet

Ok.
Un deuxième test pour vérifier que le fichier renommé n'existe pas :

Code:

---

If (objFSO.FileExists(NameFichierOrigineComplet)) AND (NOT objFSO.FileExists(NameFichierModifieComplet)) Then objFSO.MoveFile NameFichierOrigineComplet, NameFichierModifieComplet

---

Bonne continuation

Merci

J'avais un souci de syntaxe !

Parfait c'est top. Encore un grand merci :ccool: