Bonjour à tous,
Je viens de mettre en service un petit bout de script permettant de copier un fichier Excel et de le coller dans un dossier.
Le script fonctionne, sauf que maintenant je cherche comment désactiver ou supprimer les liaisons Excel de ce fichier copier :-)
Merci de votre aide. Jérôme
Ci-dessous le script utilisé pour copier le fichier Excel
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 'Déclaration des variables Dim Date_Maintenant, Heure_Maintenant, FSCopie 'Formatage de la date et de l'heure Date_Maintenant = date Date_Maintenant = day(Date_Maintenant) & month(Date_Maintenant) & year(Date_Maintenant) Heure_Maintenant = time Heure_Maintenant = Hour(Heure_Maintenant) & Minute(Heure_Maintenant) '& Second(Heure_Maintenant) 'Copie du fichier Set FSCopie = CreateObject("Scripting.FileSystemObject") FSCopie.CopyFile "C:\Users\ADMIN\Essai1.xlsx" , "C:\Users\ADMIN\Desktop\Test\" & Date_Maintenant & "_" & Heure_Maintenant & ".xlsx"
Partager