Microsoft 365 Initialize un combobox dans une feuil

Staple1600

XLDnaute Barbatruc

• 14 Février 2021

• #2

Bonsoir le fil

Si le combobox se nomme Combobox1
A mettre dans le code de la feuille où il se trouve

VB:

Private Sub Worksheet_Activate()
Me.ComboBox1.Clear
End Sub

 

Vote positif 0 Vote négatif

gothc

XLDnaute Occasionnel

• 14 Février 2021

• #3

Après test ça fonctionne pas
je passe par combobox listfillrange pour remplir ma liste déroulante
je ne dois pas je pense
merci

 

Vote positif 0 Vote négatif

gothc

XLDnaute Occasionnel

• 14 Février 2021

• #4

Private Sub Workbook_Open()
Feuil1.ComboBox1.Text = ""

End Sub
j'ai trouvé cette solution

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 14 Février 2021

• #5

Re

C'est plutôt ceci que tu voulais faire par rapport à mon 1er message

VB:

Private Sub Worksheet_Activate()
Me.ComboBox1.ListIndex = -1
End Sub

Tu peux aussi le tester dans une procédure WorkBook_Open()

VB:

Private Sub Workbook_Open()
Feuil1.ComboBox1.ListIndex = -1
End Sub

 

Vote positif 0 Vote négatif

gothc

XLDnaute Occasionnel

• 15 Février 2021

• #6

m

Staple1600 à dit:

Re

C'est plutôt ceci que tu voulais faire par rapport à mon 1er message

VB:

Private Sub Worksheet_Activate()
Me.ComboBox1.ListIndex = -1
End Sub

Tu peux aussi le tester dans une procédure WorkBook_Open()

VB:

Private Sub Workbook_Open()
Feuil1.ComboBox1.ListIndex = -1
End Sub

Cliquez pour agrandir...

merci

 

Vote positif 0 Vote négatif