Recherche mot

Résolu
ordi94 -  
Bonjour,

dans une cellule il y a plusieurs mots moi je cherche un mot ex toto
for each c in range("A1;A11)
if c.value like toto then ???????
merci

2 réponses

  1.  f894009
    Bonjour, 

    Sub test1()
    With Worksheets("feuil1")
        For Each cel In .Range("A1:A10")
            If cel Like "*toto*" Then
                MsgBox "mot trouvé dans cellule: " & cel.Address
            End If
        Next cel
    End With
End Sub

    Discussions similaires

    question pix mot caché
    aorum10

    7 réponses
    Mot de passe administrateur Freebox : où le trouver ?
    Utilisateur anonyme

    7 réponses