Trouver une valeur en appuyant sur un bouton [Résolu/Fermé]

zer4 53 Messages postés lundi 31 octobre 2011Date d'inscription 12 décembre 2017 Dernière intervention - 13 janv. 2017 à 09:09 - Dernière réponse : zer4 53 Messages postés lundi 31 octobre 2011Date d'inscription 12 décembre 2017 Dernière intervention
- 13 janv. 2017 à 10:08
Bonjour,
Je créé actuellement un planning sous excel et je souhaiterais (étant donné que je possède une longue liste d'outillages ) retrouvé un outils par rapport a son nom grâce a une liste déroulante.

Auriez-vous un code en VBA ou une solution qui pourrais m'aider ?

Cordialement.


Afficher la suite 

2 réponses

gbinforme 14535 Messages postés lundi 18 octobre 2004Date d'inscriptionContributeurStatut 13 janvier 2018 Dernière intervention - 13 janv. 2017 à 09:19
0
Utile
1
Bonjour,

Sans bouton mais avec une macro événementielle à placer dans ta feuille :
Private Sub Worksheet_Change(ByVal sel As Range)
If Not Intersect([A1], sel) Is Nothing Then
    Cells.Find(sel, sel, xlValues, xlWhole).Activate
End If
End Sub

Il te suffit de remplacer A1 par l'adresse de la cellule où tu as ta liste déroulante.
zer4 53 Messages postés lundi 31 octobre 2011Date d'inscription 12 décembre 2017 Dernière intervention - 13 janv. 2017 à 10:08
Super ça marche parfaitement !
Je vous remercie beaucoup.