[RESOLU par DL_13 et JOB75] : OBLIGATION de choisir ComboBox1

S

Si...

XLDnaute Barbatruc

• 4 Février 2016

• #16

Re : [RESOLU par DL_13 et JOB75] : OBLIGATION de choisir ComboBox1

re

@ChTi : certains ont horreur du vide ! On peut le "masquer "

Code:

Private Sub UserForm_Initialize()
  Me.Height = 70
  ComboBox1.List = Array(1, 2, 3)
  ComboBox2.List = Array("aaa", "bbb", "ccc")
  ComboBox3.List = Array(111, 222, 333)
End Sub

Private Sub ComboBox1_Change()
  Me.Height = IIf(ComboBox1.ListIndex < 0, 70, 240)
End Sub

Nota : les hauteurs sont fonction de la création

 

Pièces jointes

• Combobox pour continuer ou pas.xlsm

  19.8 KB · Affichages: 25

Vote positif 0 Vote négatif

L

laetitia90

XLDnaute Barbatruc

• 4 Février 2016

• #17

Re : [RESOLU par DL_13 et JOB75] : OBLIGATION de choisir ComboBox1

re tous SI ChTi160

ou encore utiliser un frame

 

Pièces jointes

• Userform (1).xlsm

  19.6 KB · Affichages: 36
• Userform (1).xlsm

  19.6 KB · Affichages: 35

Vote positif 0 Vote négatif

MADAGASCAR

XLDnaute Occasionnel

• 4 Février 2016

• #18

Re : [RESOLU par DL_13 et JOB75] : OBLIGATION de choisir ComboBox1

Bonjour SI...
Bonjour Laetitia90
Des formidables leçons dans de ce sujet proposés par des meilleurs membres
Du fond du coeur : MERCI et BRAVO
Tres tres cordialement
MADA BLACK

 

Vote positif 0 Vote négatif