Discussion :

[monteverest]

Bonjour,

J'essaye de savoir si c'est possible que le [what"nom"] dans Selection.Find soit une variable et si oui comment faire s'il vous plait?

exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Columns("B:B").Select
    Selection.Find(What:="ma_variable ", After:=ActiveCell, LookIn:=xlFormulas, _
        LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
        MatchCase:=False, SearchFormat:=False).Activate

if selection.find = true then

Merci par avance

[Philippe Tulliez]

Bonjour,
Tout simplement en remplaçant la chaîne de caractères "maValeur" par le nom de la variable de type String

Exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub t()
  Dim LookUpRange As Range ' Plage de recherche
  Dim CellFound As Range   ' Cellule trouvée
  Dim LookupValue As String
  Set LookUpRange = Range("t_Staff").ListObject.ListColumns("Site").DataBodyRange
  LookupValue = "Lisbonne"
  Set CellFound = LookUpRange.Find(What:=LookupValue, After:=ActiveCell, LookAt:=xlWhole, LookIn:=xlValues)
  MsgBox "Trouvé " & LookupValue & " à l'adresse " & CellFound.Address
  Set LookUpRange = Nothing: Set CellFound = Nothing
End Sub

A lire éventuellement Utiliser les variables en VBA Excel

[monteverest]

Merci