Comment vérouiller une cellule par un code?

Comment vérouiller une cellule par un code? - VB/VBA/VBS - Programmation

Marsh Posté le 08-12-2005 à 09:57:01    

Bonjour,
Voilà, mon problème : j'ai 3 boutons, 3 cellules je veux qu'une fois que chaque bouton soit clické, la cellule adjacente soit vérouillée en écriture (mais qu'on puisse faire ce qu'on veut sur le reste de la feuille!)
J'ai essayé avec la propriété ".locked "mais elle ne peut pas s'appliquer à une cellule.
Quelqu'un a une idée?  :bounce:

Reply

Marsh Posté le 08-12-2005 à 09:57:01   

Reply

Marsh Posté le 08-12-2005 à 10:37:59    

Avec VBA, la propriété .locked s'applique bien à une cellule. Quel code utilises-tu (si tu travailles bien avec VBA: je ne connais pas VB)?
Dans l'exemple, on sélectionne la cellule A1 et on la verrouille
Range("A1" ).Select
Selection.Locked = True

Reply

Marsh Posté le 07-01-2006 à 00:42:34    

Bonjour,  
 
Si ".Locked" ne marche pas, tu peux aussi faire ça :  
 
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)     'ThisWorkbook, Selection d' un objet de la feuille
If ActiveCell.Address = "$A$1" Then
SendKeys "{Enter}", True
End If
End Sub
 
 
Le problème, c' est qu' il est bien plus facile de faire sauter la "protection." (Il ya mieux)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed