Microsoft 365 Initialize un combobox dans une feuil

[gothc]

Bonjour le forum
je cherche comment remettre a zéro un combobox (liste déroulante) à l'ouverture du fichier
Merci de votre aide

 

[Staple1600]

Bonsoir le fil

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

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

 

[gothc]

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

 

[gothc]

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

End Sub
j'ai trouvé cette solution

 

[Staple1600]

Re

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

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

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

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

 

[gothc]

m

Re

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

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

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

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

merci