Microsoft 365 vérouillage de certaines cellules via vba

[FCMLE44]

Bonjour

J'ai un fichier qui contient des macros
Je souhaiterais à l'aide d'une vba préciser quelles cellules de plusieurs feuilles je souhaite que les données puissent etre effacées
Je l'ai fait avec protection mais sachant que le fichier contient des macros cela me cause souci

Quel code pourrias je mettre ?

Merci

 

[sylvanu]

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

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

 

[FCMLE44]

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

 

[sylvanu]

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.

 

[FCMLE44]

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

 

[sylvanu]

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.

 

[FCMLE44]

Je ne vois pas le code

 

[sylvanu]

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

 

[FCMLE44]

Pas de souci
Merci

 

[FCMLE44]

?

 

[sylvanu]

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.

 

[sylvanu]

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.

 

[FCMLE44]

Le voici

 

[sylvanu]

Merci

 

[sylvanu]

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. )