VBA / Excel 2003 - Sécuriser cellules

RussellD Messages postés 57 Date d'inscription   Statut Membre Dernière intervention   -  
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous,

j'ai une feuille Excel sur laquelle je veux tout sécuriser sauf une cellule.
Je voudrais que cette cellule reste "libre d'entrée", c'est-a-dire qu'un utilisateur puisse changer sa valeur. Par contre, je voudrais etre sur qu'il ne puisse pas modifier sa mise en forme, notamment la couleur du texte qui doit rester la même.

Comment puis-je faire cela via VBA? merci d'avance pour vos réponses.

4 réponses

Réponse 1 / 4
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Bonjour,

Il n'y a pas besoin de VBA, il suffit déverrouiller uniquement la cellule concernée (format de cellule, protection, décocher verrouillé) puis de protéger la feuille (outil, protection, protéger la feuille).

Patrice
0
Réponse 2 / 4
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
Re,

Si tu tiens vraiement a une macro VBA,
en supposant que la cellule autorisée soit B12 : 

Sub Test() 
     
    Cells.Locked = True 
    Range("B12").Locked = False 
    ActiveSheet.Protect Password:="toto", DrawingObjects:=True, Contents:=True, Scenarios:=True 

End Sub


Patrice
Nicolas dit toujours : « C'est facile quand on connait la réponse ! »
0
Réponse 3 / 4
RussellD Messages postés 57 Date d'inscription   Statut Membre Dernière intervention   7
 
Merci beaucoup pour ta réponse.

Cordialement
0
Réponse 4 / 4
Patrice33740 Messages postés 8561 Date d'inscription   Statut Membre Dernière intervention   1 780
 
De rien, avec plaisir
0