Bonjour a tous,
j'ai développer une petite application qui découpe un fichier avec mot de passe en plusieur autre.J'aurais voulu savoir si il etait possible d'appliquer le meme mdp sur ces nouveaux fichiers par macro.
J'ai procédé comme ca:
(j'ai un premier fichier excel d'ouvert, et j'en créé un second pour y copier les valeur et supprimer ce dont je n'ai pas besoin)
J'ai fais du pas a pas et quand je regarde la valeur du mot de passe de ActiveWorkBook, ca me retourne: ******
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Dim lePass As String lePass = ActiveWorkbook.Password Sheets.Copy ActiveWorkbook.Password = lePass ActiveWorkbook.WritePassword = lePass ActiveWorkbook.SaveAs ".\"& nomManager & ".xls" ActiveWorkbook.Close
Quelqu'un connait une solution ?
Partager