VBA / Excel 2003 - Sécuriser cellules

RussellD Messages postés 60 Statut Membre -  
Patrice33740 Messages postés 8400 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

  1. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 783
     
    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
  2. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 783
     
    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
  3. RussellD Messages postés 60 Statut Membre 7
     
    Merci beaucoup pour ta réponse.

    Cordialement
    0
  4. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 783
     
    De rien, avec plaisir
    0