-une fois que je lance l'éxecution de ce code depuis VBA, est-ce que cela sélectionne la cellules trouvée sous excel?
Application.CutCopyMode = False Selection.Copy With New DataObject .GetFromClipboard Contenu = .GetText(1) End With MsgBox (Contenu)
Cells.Find(What:="Nom de cellule", After:=ActiveCell, LookIn:=xlFormulas, _ LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False, SearchFormat:=False).Activate
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionDim laquelle as range, derligne as long derligne = Sheets("nom_de_ta_feuille_de_recherche").Range("U" & rows.count).end(xlup) Set laquelle = Sheets(""nom_de_ta_feuille_de_recherche"").Range("U1:U" & derligne).Find(Sheets("nom_de_la_feuille_contenant_ta_valeur").Range("B23").Text, LookIn:=xlValues, LookAt:=xlPart) If not is nothing laquelle then laquelle.select ' juste pour constater.
derligne = Sheets("nom_de_ta_feuille_de_recherche").Range("U" & rows.count).end(xlup)
Oui je comprends mieux, il manquait la fin de cette ligne dans ton autre post.