recherche dans plage variable

[christian]

bonjour à tous,





comment savoir s'il existe le mot "fin" dans ma plage selectionnée qui peut être variable et discontinue (par ex: a1:a10 et a15:a20)


merci

 

[Lord Nelson]

Salut Christian,

Voici une boucle qui va pouvoir t'aider :

Sub ChercheFin()
Dim CL As Range
For Each CL In Selection
If CL.Text = "fin" Then
MsgBox "fin est dans la cellule " & CL.Address
Exit For
End If
Next
End Sub

(Macro ChercheFin à copier/coller dans un module)

A+
Horatio