Bonjour
Je veux déplacer un fichier PDF avec une macro WORD d'un dossier source vers un autre dossier destination puis supprimer le fichier origine dans le dossier source.
VBA bloque sur la ligne 4 avec le message fichier introuvable.
Merci pour votre aide.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 nomfichier = nfichier2 & ".pdf" sourceW = "R:\2.DOCUMENTS GENERAUX\3.MODELES\PERSONNEL_ABSENCES - NDF\DEMANDE DE CONGES A VALIDER" DestinationW = "R:\2.DOCUMENTS GENERAUX\3.MODELES\PERSONNEL_ABSENCES - NDF\DEMANDE DE CONGES VALIDEES" FileCopy sourceW & nomfichier, DestinationW & nomfichier Kill sourceW & nomfichier
Partager