zone de liste déroulante + protection

wilfried_42

XLDnaute Barbatruc

• 17 Avril 2007

• #2

Re : zone de liste déroulante + protection

bnonjour bradvid

c'est une combobox formulaire que tu as du mettre en place, cette cobobox est liée à une cellule, cette cellule ne doit pa etre protégée

 

Vote positif 0 Vote négatif

B

Bradvid

XLDnaute Occasionnel

• 17 Avril 2007

• #3

Re : zone de liste déroulante + protection

Merci beaucoup Wilfried 42, c'était bien cela.
Mais maintenant j'ai un autre petit souci....
La macro que je lance affiche une inputbox pour que l'utilisateur puisse entrer du texte, mais la cellule que j'insère doit être protégée automatiquement.
Quel est le code pour déprotéger une cellule?
Merci par avance.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Avril 2007

• #4

Re : zone de liste déroulante + protection

Bonsoir

pour déverouiller une cellule :

Code:

Range("a1").Locked = False

@+

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 17 Avril 2007

• #5

Re : zone de liste déroulante + protection

Re

attention, il faut que la feuille soit déprotégée

Code:

Sheets(1).Unprotect Password:="toto"
Range("a1").Locked = False
Sheets(1).Protect Password:="toto"

@+

 

Vote positif 0 Vote négatif

B

Bradvid

XLDnaute Occasionnel

• 17 Avril 2007

• #6

Re : zone de liste déroulante + protection

Pierrot93 à dit:

Re

attention, il faut que la feuille soit déprotégée

Code:

Sheets(1).Unprotect Password:="toto"
Range("a1").Locked = False
Sheets(1).Protect Password:="toto"

@+

Cliquez pour agrandir...

Merci Pierrot93,
ça marche !

 

Vote positif 0 Vote négatif