Blocage liste déroulante

[tallia64]

Bonjour je souhaiterai bloquer une liste déroulante selon un critère. ex : si combobox1 ="A" la combobox2 se déroule sinon elle reste bloquer. Je vous rermercie pour votre aide.

Tallia64🙂

 

[biloute91]

Re : Blocage liste déroulante

Bonjour,

A tester et à adapter

A+

 

[Lii]

Re : Blocage liste déroulante

Bonjour

ainsi peut-être :

ComboBox2.Enabled = IIf(ComboBox1 = "A", False, True)

 

[tallia64]

Re : Blocage liste déroulante

bonsoir merci pour votre aide. Cependant j'ai oublié de préciser qu'en fait je voulais bloquer ma liste déroulante sur la 1 ère ligne afin quand même d'autoriser la saisie que sur cette ligne. Désolée pour cette oubli. je vous remercie.
Tallia64

 

[tallia64]

Re : Blocage liste déroulante

Bonjour je reviens vers vous pour ma liste déroulante. Serait il possible de bloquer la liste sur la 1ère ligne pour la saisie? je vous remercie d'avance. bonne journée tallia

 

[tallia64]

Re : Blocage liste déroulante

Je reviens avec mon petit problème pour ma liste déroulante. Si vous avez une solution ?? Je vous en remercie d'avance.

Tallia

 

[Fo_rum]

Re : Blocage liste déroulante

Salut,

...je voulais bloquer ma liste déroulante sur la 1 ère ligne afin quand même d'autoriser la saisie que sur cette ligne...

😕
Je pense ne pas être le seul à ne pas comprendre cette demande.
Pour moi, comme pour ceux qui t'ont répondu, bloquer c'est interdire tout autre choix !
Veux-tu que la liste se déroule en proposant les cas mais revienne à la première ligne quelque soit le choix ?
Si c'est cela tu peux tester :

Private Sub ComboBox1_Change()
 If ComboBox1.Value = "A" Then
   ComboBox2.ListIndex = 0
 Else
   'suite à donner
 End If
End Sub
Private Sub ComboBox2_Change()
 If ComboBox1.Value = "A" Then ComboBox2.ListIndex = 0
 'suite à donner
End Sub

si non, apporte nous d'autres précisions.

 

[tallia64]

Re : Blocage liste déroulante

Bonjour je réponds un peu tardivement à votre message. Je vous remercie pour votre message mais j'ai réussi à bloquer ma liste déroulante dont voici le code :

if not choix_du_service = 2 then
combobox1.rowsource = ""
else
if choix_du_service = 2 then
combobox1.text ="bases ! n1:n137"
end if
end if

Tallia 🙂