Discussion :

[thomasvst]

Bonjour,

je voudrais que lorsque je sauve mon fichier xls, une copie de mon fichier soit réalisée, mais en retirant le protection par mot de passe.

Si j'exécute la commande VBA

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ThisWorkbook.SaveAs "c:test.xls", , ""
End Sub

, la sauvegarde s'effectue correctement, mais le le fichier en cours dans Excel devient c:test.xls... ce qui est très embêtant....

Quelqu'un a une idée ?

[SfJ5Rpw8]

as-tu essayé ThisWorkbook.SaveCopyAs

[ouskel'n'or]

Regarde à SaveCopyas dans l'aide

[thomasvst]

Je ne vois pas comment retirer le mot de passe avec ThisWorkbook.SaveCopyAs
Il y a juste moyen de spécifier le fichier a copier et le nom de la copie...

[ouskel'n'or]

Tu déprotèges ton fichier, tu l'enregistres comme copie et tu remets la protection