Bonsoir,

Je souhaite utiliser la Sub Copy entre 2 feuilles protégé de mon classeur. Mais probleme, car même en autorisant la modification par macro (UserInterfaceOnly:=True), j’ai un message d’erreur disant que la feuille et protégé…

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Public Sub test_protect_avec_copy()
 
Worksheets("Sheet1").Protect UserInterfaceOnly:=True  'protection de la modification du contenu de la feuille, autorise par macro
Worksheets("Sheet2").Protect UserInterfaceOnly:=True
Worksheets("Sheet1").Range("A1") = 25  'OK ca marche
Worksheets("Sheet1").Range("A1").Copy (Worksheets("Sheet1").Range("A2"))  'OK ca marche
Worksheets("Sheet1").Range("A1").Copy (Worksheets("Sheet2").Range("A2"))  'message d'erreur : la feuille est protege...
 
End Sub

Est-ce un bug de Excel ou pourquoi la copie fonctionne dans intra feuille et non pas inter feuilles ?

Merci