XL 2010 Recherche simplifiée de produit dans un tableau Excel.

DAVID-44- à dit:

Bonjour à tous,
J'ai un tableur "Stock" avec de très nombreux produits. Je souhaiterais pouvoir faire une recherche de produit très rapidement à l'aide d'une macro actionnée avec un bouton.
Je vous joins le fichier. Le but par exemple est de noter, grâce à une liste déroulante, le nom du produit dans la cellule "G4" puis actionner le bouton "?" pour trouver et me diriger directement en cellule "C102".
Merci de votre aide.
Bonne journée à tous.
David.

Cliquez pour agrandir...

Sub Recherche()
    Dim Lig
    If IsNumeric(Application.Match([g4], [c:c], 0)) Then
        Lig = Application.Match([g4], [c:c], 0)
        Application.Goto Cells(Lig, 1), True
        Else
        MsgBox "Produit non présent", vbInformation, "Information"
    End If
End Sub

​

DAVID-44- à dit:

Pour le mot de passe, il revient automatiquement dès que j'ouvre le fichier...

​

Cliquez pour agrandir...