Afficher ligne après une recherche
JonBid
Messages postés
7
Statut
Membre
-
cs_Le Pivert Messages postés 8437 Statut Contributeur -
cs_Le Pivert Messages postés 8437 Statut Contributeur -
Bonjour à tous !
J'ai un fichier excel où j'ai programmé un bouton qui me permet d'effectuer un recherche. Cependant, je souhaiterais qu'à la suite de cette recherche (d'une référence par exemple), cela affiche la ligne du résultat trouvé.
mon code actuel est le suivant:
et cela m'affiche:
Comment puis-je faire ça?
Merci d'avance
JB
J'ai un fichier excel où j'ai programmé un bouton qui me permet d'effectuer un recherche. Cependant, je souhaiterais qu'à la suite de cette recherche (d'une référence par exemple), cela affiche la ligne du résultat trouvé.
mon code actuel est le suivant:
Sub Recherche()
Range("A1").Select
Application.Dialogs(xlDialogFormulaFind).Show
End Sub
et cela m'affiche:
Comment puis-je faire ça?
Merci d'avance
JB
1 réponse
-
Bonjour,
Le code que tu montres sélectionne déjà le résultat trouvé.
Ce que tu veux c'est sélectionner toute la ligne?
A mettre dans le module de la feuille concernée:
Option Explicit Dim ligne As Long Private Sub CommandButton1_Click() Application.CommandBars.FindControl(ID:=1849).Execute End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) ligne = ActiveCell.Row Rows(ligne & ":" & ligne).Select End Sub
