accès bloqués à un combobox ou à un textbox suivant celui utilisé

[nicole]

Bonjour à tous,

j'ai un pb assez urgent à résoudre. Sur un formulaire j'ai un combobox et un textbox. Je souhaite que si l'on se rende sur le combobox pour obtenir des infos qu'il ne soit pas possible d'écrire dans le textbox et réciproquement; j'ai un bouton qui se charge après de remettre les pendules à zéro et choisir celui que l'on veut utiliser.

j'arrive à bloquer l'accès au combobox quand je suis sur le textbox mais pas à faire l'inverse. Pourriez-vous m'aider?

mes codes


Private Sub TextBox1_Change()
If Len(TextBox1.Value) > 0 Then
ComboBox1.Enabled = False

End If
End Sub

Private Sub ComboBox1_Change()
If ComboBox1.Value = True Then

TextBox1.Value = False

End If
End Sub

merci d'avance

Nicole

 

[nicole]

je vous joins aussi le code du bouton OK

Private Sub CommandButton1_Click()
If Len(TextBox1.Value) > 0 Then
Worksheets("Feuil1").Activate
Worksheets("Feuil1").Range("C12").Value = TextBox1.Value
End If

Worksheets("Feuil1").Activate
Sheets("Feuil1").Range("C12") = UserForm3.ComboBox1
Unload Me

End Sub

 

[Laurent]

Bonjour Nicole,

Avec le code suivant dès que tu as quelque chose dans la Textbox1 le Combobox1 se bloque et inversement.
Il faut cependant que l'on sélectionne quelque chose.

En espérant que cela puisse t'aider,

A++
Laurent

Private Sub ComboBox1_Change()
If ComboBox1.Value <> "" Then
TextBox1.Enabled = False
Else
TextBox1.Enabled = True
End If
End Sub
Private Sub TextBox1_Change()
If TextBox1.Value <> "" Then
ComboBox1.Enabled = False
Else
ComboBox1.Enabled = True
End If
End Sub

 

[nicole]

Super, merci Laurent,

ça marche très bien , j'avais beau chercher je ne comprenais pas pourquoi ça ne fonctionnait pas.

merci encore et bonne soirée.

Nicole

 

[Laurent]

Re salut

De rien Nicole, je n'ai aucun mérite, c'est grace à cet excellent forum que j'ai pu faire ce genre de chose...

Une autre petite chose, si tu veux carrément qu'on ne voit plus le cbx ou la txb tu peux remplacer enabled par visible.

Voila, A++

Laurent

 

[hoss]

Salut à tous,
Est ce que ceci peut être fait sur une feuille Excel avec des listes déroulantes (c'est à dire bloquer une liste si l'autre est utilisée et vice versa...
Dans mon cas, je remplis ma feuille ligne par ligne et à un moment, j'ai le choix entre 2 listes déroulantes et je voudrais bien bloquer l'une si l'autre est utilisée...
Any idea...
Merci bcp
hoss

 

[nicole]

Salut Laurent, Hoss, le forum,

A mon avis en remplaçant combobox1 et textbox1 par listbox1 et listbox2 ça devrait marcher.

Bon courage