Bonjour,
Voici une proposition, avec un tableau structuré nommé "Tableau1"
Pour que la ligne d'entête et la combobox restent en ligne 1 j'ai figé cette dernière.
Cordialement
Bonjour Hasco,
Merci pour ta proposition, je l'ai mise en place et lorsque je selectione avec le bouton du combobox il m'affiche les produits de mon stock je peux alors en choisir un et il s'affiche en haut comme chez toi. Mais si je fais une recherche avec les premières lettres il m'affiche "erreur ! Permission refusée"
je te fais une copie des codes dans ma feuille stock ci-dessous.
Merci pour me dire ce qui va pas.
A+
"Private Sub Worksheet_Activate()
If [Tableau2].ListObject.AutoFilter Is Nothing Then
[Tableau2].AutoFilter
End If
End Sub
Option Explicit
Dim Valeurs
Sub initValeurs()
Valeurs = Application.Transpose(Range("Tableau2[Désignation]"))
End Sub
Private Sub ComboBox1_Change()
Dim idx As Variant
If Me.ComboBox1 <> "" Then
Valeurs = Application.Transpose(Range("Tableau2[Désignation]"))
idx = Application.Match(Me.ComboBox1, Valeurs, 0)
If IsError(idx) Then
Me.ComboBox1.List = Filter(Valeurs, Me.ComboBox1.Text, True, vbTextCompare)
Me.ComboBox1.DropDown
Else
Application.Goto Range("Tableau2").Rows(idx), True
End If
End If
End Sub"