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"