XL 2016 Impossible de protéger cellules Verrouillées

[KTM]

Bonjour chers tous

Je voudrais protéger les feuilles de mon classeur.

Pour chaque feuille toutes les cellules sont verrouillées sauf les zones en jaune .

La protection autorise uniquement la sélection des cellules.

Après avoir protéger mes feuilles il se trouve que certaines cellules verrouillées ne sont pas touchées par la protection. Surtout des cellules du deuxième tableau.

Mot de passe =0000
Je l'ai fais manuellement comme par macro mais le résultat est identique
Voici la macro utilisée:

Sub protectPlage()
Dim sh As Worksheet
Dim i As Long
Application.ScreenUpdating = False

    For Each sh In ThisWorkbook.Worksheets
        With sh
            .Activate
            .Unprotect "0000"
            .Cells.Locked = True
        End With
    Next sh
For i = 1 To 4
       With Worksheets(i)
            .Activate
            .Range("D3:D45,F3:H45,J3:J45").Locked = False
            .Range("D28:D39,F28:H39,J28:J39").Locked = False
            .Range("R7:AK23,R30:AK30,R36:AK40").Locked = False
            .EnableSelection = xlNoRestrictions
            .Protect "0000"
        End With
Next i
End Sub

J'ai besoin vraiment d'aide.

Merci!!!!!

 

[sylvanu]

La PJ #5 est corrigée. C'est plus simple que de modifier votre fichier.

 

[TooFatBoy]

Oui, mais comment en arrive-t-on là ?

Ca, je ne sais pas comment il en est arrivé là.
C'est peut-être un fichier créé par quelqu'un d'autre qui avait activé ce truc ???

Comme je suppose que KTM ( ni moi d'ailleurs ) ne connaissions ça, il n'y a pas touché.

Et moi non plus je ne connais pas.
Comme je l'ai dit, j'ai trouvé ça par hasard en cherchant à résoudre son problème.

Peut-on jouer sur ce paramètres autrement que par cette commande ? Par VBA par ex.

Très bonne question, à laquelle je n'ai malheureusement pas la réponse.

La PJ #5 est corrigée. C'est plus simple que de modifier votre fichier.

Comme expliqué plus haut, ce sont juste 3 clics de souris pour supprimer la plage spécifiée.

 

[sylvanu]

Bonjour,
Ca me travaillait l'esprit ! Pourquoi mettre en place un système qui permet d'accéder à des cellules verrouillées sur une feuille protégée. Autant déverrouiller ces cellules.
En fait cela permet sur une feuille protégée de donner accès à certaines cellules uniquement à certains utilisateurs.
Par ex, j'ai un fichier partagé et protégé sur lequel KTM est le seul à pouvoir modifier A1, TooFatBoy A2, et moi A3.
Ca, c'est de l'utilisation avancé d' XL !
Pour nous, ça ne sert à rien généralement ( sauf à piéger KTM ) mais au moins j'ai une réponse à ma question.
Sur ce, bonne journée.

 

[TooFatBoy]

Oui, c'est ce qui est écrit sur la capture d'écran de #10, et que j'ai cité en dessous de cette capture d'écran.

Et sur la capture on peut voir "Indiquez qui peut ...".