Bonjour,
A la fin de mon travail, je voudrais copier une feuille en écrasant la feuille protégée, présente dans un classeur fermé. Le classeur en lui-meme n'est pas protégé.
J'ai écrit :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Application.DisplayAlerts = False
    ThisWorkbook.Sheets("F1").Copy  'Copie la Feuille Tables dans un nouveau classeur
'Enregistrement sous fichier existant
ChDir "\\SHARED\DONNEES\xxx\# Livrables"
    ActiveWorkbook.SaveAs Filename:= _
        "\\SHARED\DONNEES\xxx\# Livrables\MAJ.xls", _
        FileFormat:=xlExcel8, Password:="", WriteResPassword:="", _
        ReadOnlyRecommended:=False, CreateBackup:=False
       code
    Windows("MAJ.xls").Close savechanges:=True
Application.EnableEvents = True
Application.DisplayAlerts = True
mais j'ai un message qui me dit que MAJ.xls est protégé contre l'écriture.
Est-ce que quelqu'un peut m'aider ?
Merci