XL 2021 Pb macro sur feuille protégée

[goube]

Bonsoir à tous,

Je rencontre un problème d'écriture sur un onglet protégé, malgré la macro de déprotection dans le thisworkbook.

Si quelqu'un à la solution.

Cordialement

 

[ChTi160]

Bonsoir.
Tu peux dans ta macro déprotéger ta feuille y faire ce que tu as a y faire et en fin de macro le reproteger.

Sub macro
'déprotéger
Worksheets("ma feuille").Unprotect
' faire ce qu'il y a a faire !


'Puis reproteger
Worksheets("ma feuille").Protect
End Sub

Depuis mon téléphone
Jean marie

 

[TooFatBoy]

Bonjour,

Tu peux dans ta macro déprotéger ta feuille y faire ce que tu as a y faire et en fin de macro le reproteger.

Je dirais même "tu dois" déprotéger/reprotéger ta feuille pour écrire dedans.

 

[goube]

Bonsoir,
Merci pour vos réponses, je pensais que cette macro permettait de s'abstenir de déprotéger et protéger chaque feuille.
On va revenir aux fondamentaux.
Cordialement

 

[ChTi160]

Re
effectivement , il ne devrait pas y avoir de problème
avec

  Ws.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="", UserInterfaceOnly:=True

il est dit :

Contents:=True protège le contenu des cellules, mais UserInterfaceOnly:=True permet au code VBA de contourner cette protection pour apporter des modifications via du code. Bien que cela puisse sembler paradoxal, c'est une fonctionnalité spécifique à l'utilisation de UserInterfaceOnly dans le contexte de la protection de feuille de calcul en VBA.

jean marie

 

[TooFatBoy]

effectivement , il ne devrait pas y avoir de problème

Il est apparemment question d'ajouter des lignes à un TS, donc je pense que ça ne peut pas fonctionner.

D'où ma remarque sur "tu dois déprotéger/reprotéger ta feuille". 😉

 

[ChTi160]

Re
Oui il ajoute une ligne a un TS
Mais n'est ce pas modifier des cellules ?
Jean marie

 

[TooFatBoy]

Oui il ajoute une ligne a un TS
Mais n'est ce pas modifier des cellules ?

Non, pour Microsoft on dirait ben que ce n'est pas pareil que modifier des cellules.
Encore une restriction due aux TS... 🙁

En tout cas, c'est ce que j'ai pu constater il y a quelques temps quand j'ai voulu faire la même chose.
Mais peut-être me trompé-je.

 

[ChTi160]

Re
Merci
Jean marie

 

[goube]

Re,

Oui TooFatBoy tu as raison, il n'est pas possible de rajouter des lignes dans un TS si l'onglet est verrouillé. Dommage.
Cordialement

 

[ChTi160]

Bonjour le Fil
il semblerait que cette version (avec AllowInsertingRows:=True) permette l'ajout d'une Ligne !

  ws.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, Password:="", UserInterfaceOnly:=True, AllowInsertingRows:=True

Bonne Journée
Jean marie

 

[goube]

Bonjour,
Je viens d'essayer, malheureusement cela n'a pas l'air de fonctionner. Que ce soit avec la boucle ou en ciblant directement la feuille concernée.
As tu testé de ton coté ?
Cordialement

 

[ChTi160]

Re
J'ai ajouté : AllowInsertingRows:=True en bout de procédure dans la boucle du workbook open
A voir ?
Jean marie
Depuis mon téléphone

 

[TooFatBoy]

Il me semble que j'avais aussi essayé ça, et que ça ne fonctionnait pas.

Autant que je me souvienne, c'est impossible d'ajouter une ligne à un TS si la feuille n'est pas d'abord déprotégée.
En tout cas, je n'avais trouvé aucune autre solution à l'époque.

 

[goube]

Re,
C'est ce que j'ai fait, mais j'ai toujours le même message.

Cordialement