Discussion :

[bibbip35]

Bonjour à tous

Je me permets de venir vers vous car je souhaiterais filtrer une feuille avec la valeur d'un combobox
J'ai rechercher et essayer plusieurs code venant du Net mais sans succès

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub ComboBox1_Change()
If Me.ComboBox1 <> "*" Then
Worksheets("Base Machine de Report CMS").Range("$A$2").AutoFilter Field:=3, Criteria1:=ComboBox1.Value
End Sub

J'ai toujours une erreur d'execution "1004"
La méthode AutoFilter de la classe a échoué

Nota : Combobox1 alimenté par rowsource

Ci-joint le fichier qui me pose tans de problème

Pouvez-vous m'aider?

Bibbip35