Rechercher un mot dans une colonne puis lancer une macro

bonjour

j aimerais faire une recherche dans la colonne a de a7 a la fin . dans le cas ou je trouverais le mot "a repertorier" dans une des cellules de la colonne a alors je souhaiterais lancer la macro 2 sinon lancer la macro 3

en regardant les différents topic j ai essayé ça mais sans trop de convictions

With Sheets("base de travail").Range("a:a")

Set c = .Find("a repertorier", LookIn:=xlValues, LookAt:=xlPart)

If set c = "a repertorier" Then

Call Macroonglet_avec_reference_inconnue

Else: Call Macroonglet_sans_reference_inconnue

End If

merci pour vos retours

pour ceux qui serait interresse par la solution , en cherchant un peu j ai trouvé une solution bis.

j ai utilisé un nb.si avec mon mot en critère et si le résultat était 0 alors je demandais a lancé la procédure 1 sinon il est supérieur a 0 je lançais la procédure 2 .

If ws.Range("b1") > 0 Then

Call Macroonglet_avec_reference_inconnue

Else: Call Macroonglet_sans_reference_inconnue

en espérant avoir aidé certain qui serait dans mon cas