Microsoft 365 vérouillage de certaines cellules via vba

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #2

Bonjour FCMLE,
Le plus simple, de loin, est de déprotéger la feuille, bosser, la reprotéger :

VB:

Sub test()
    ActiveSheet.Unprotect ("mot de passe")
    ' On peut bosser la feuille est déprotégée
    Protect "mot de passe", UserInterfaceOnly:=True
End Sub

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 21 Décembre 2020

• #3

Et comment dans ce code je peux rajouter les cellules que je souhaite laisser modifiable ?
Elles se trouvent dans plusieurs feuilles

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #4

Dans votre feuille, pour chaque cellule que vous souhaitez laisser accessibles vous faites clic droit Format de cellules/Protection et vous décochez la case Verrouillée.
A ce moment là la cellule sera toujours accessible que la feuille soit protégée ou non.

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 21 Décembre 2020

• #5

Oui mais si je bloque toutes mes feuilles mes boutons et autres liens hypertextes ne seront plus dispo ?
Mon fichier en exemple.
Par exemple, sur la feuille salariés, les cellules B8, B9, B10 etc........ doivent rester accessible également pour mes boutons et lien hypertexte

 

Pièces jointes

• Maquette STC TEST.xlsm

  396.1 KB · Affichages: 18

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #6

En PJ :
3 boutons dévérouillés.
Cellules B8:B19 dévérouillées
Cellules B2 dévérouillée pour les boutons

Plus quelques Unprotect/Protect dans le code.

Regardez bien les options que j'ai mis dans Protéger la feuille, on peut autoriser ou non certaines modifications.

Par contre c'est une méthode à utiliser en début de conception. A la fin ça risque d'être fastidieux.

 

Pièces jointes

• Maquette STC TEST.xlsm

  380.4 KB · Affichages: 8

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 21 Décembre 2020

• #7

Je ne vois pas le code

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #8

Oups !!! J'ai une erreur DLL à l'ouverture.
Je vais le refaire. Je ne sait pas ce qui s'est passé.

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 21 Décembre 2020

• #9

Pas de souci
Merci

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 21 Décembre 2020

• #10

?

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #11

Je l'ai refait, ... et retrouvé le problème de DLL quand je l'ai ré ouvert.
J'ai du mal mettre quelque chose dans le code.
Mais je persévère.

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #12

Vous pouvez me renvoyer votre fichier ?
A chaque fois que je modifie quelque chose et l'enregistre, à la ré ouverture il me dit problème dll et perd toutes les macros.
Pourtant les modifs sont légères, juste un déverrouillage de cellules.

 

Vote positif 0 Vote négatif

F

FCMLE44

XLDnaute Impliqué

• 21 Décembre 2020

• #13

Le voici

 

Pièces jointes

• Maquette STC TEST.xlsm

  403.5 KB · Affichages: 7

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #14

Merci

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 21 Décembre 2020

• #15

Vraiment désolé.
Dès que fais la moindre modif dans votre fichier et que je l'enregistre. A la ré ouverture il me jette, problème DLL et supprime le VBA. Encore jamais vu.
Peut être un pb de version, je suis en XL2007.

Ceci étant dit, je vous ai fait une maquette.
La page est protégée, mais on peut mettre l'adresse, les trois boutons en haut ainsi que les 5 premiers boutons à droite sont actifs. ( mais avec macro bidon qui écrit le nom du bouton appuyé en U29. )

 

Pièces jointes

• FCMLE.xlsm

  114.7 KB · Affichages: 2

Vote positif 0 Vote négatif