Bloquer contenu d'un textbox

[babouchate]

Bonjour,

J'aimerais bloquer le contenu d'un textbox (impossibilité d'écriture dans le textbox) si un chekbox est décoché. Et quand click sur le chekbox, le txtbox se débloque permettant ainsi la saisie d'une valeur.

Je vous remercie par avance,

H.J.

 

[babouchate]

Re : Bloquer contenu d'un textbox

Dull,

l'ommission des "1" était un acte prémédité et délibéré pour que les utilisateurs du Code modifie les noms de textbox et checkbox.
Parce que tu modifie pas les noms toi?
Je tiendrai la prochaine fois à mettre les 1 pour les gens qui copie le code tel qu'il est ...

Bonne journée!

 

[skoobi]

Re : Bloquer contenu d'un textbox

Re,

Re

pour Skoobi

modifier comme suit peut être :

Private Sub TextBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Not CheckBox1 Then CheckBox1.SetFocus: TextBox1.ControlTipText = "TEXTBOX BLOQUE"
End Sub
Private Sub UserForm_Initialize()
[B]TextBox1.TabStop = 0[/B]
CheckBox1.SetFocus
End Sub
Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox1.ControlTipText = ""
End Sub
[B]Private Sub CheckBox1_Change()[/B]
[B]TextBox1.TabStop = CheckBox1[/B]
[B]End Sub[/B]

@+

Par exemple.
Au fait, je ne disais pas cela pour moi😉.

Perso, j'utiliserai plutôt "Locked" en associant la couleur de fond du "textbox" (grisé/non grisé), c'est plus visuel, mais bon, les gouts et les couleurs...

 

[Pierrot93]

Re : Bloquer contenu d'un textbox

Re,

pas de problème Skoobi🙂, cela pourra servir éventuellement à quelqu'un d'autre...

bonne fin d'après midi
@+