Hello,
J'ai une macro qui permet d'ouvrir un fichier dont le nom est dans une case de mon classeur ("NomPV"), de le renommer ("ChronoPV") et de l’enregistrer à un autre emplacement. Le problème c'est que parmi ces PV, il y a des fichier word et des fichiers excel (xls ou xlsx).
'origine du fichier PV
Chemin = "C:\Users\Moulin\Desktop\travail sur les pv\listes pv\"
'ouvre n'importe quel fichier avec succés
ActiveWorkbook.FollowHyperlink Chemin & NomPV
'destination du fichier
Chemin = "C:\Users\Moulin\Desktop\travail sur les pv\archivage\"
'Tentative de sauvegarde qui ne marche pas car ne prend pas en compte l’extension du fichier
Workbooks(NomPV).SaveCopyAs Chemin & ChronoPV
Je n'arrive pas à sauvegarder les fichiers. J'ai trouvé une commande qui fonctionne exclusivement avec Word et une autre avec Excel. J'aimerai avoir une commande qui me permet de sauvegarder n'importe quel fichier.
Merci !