Discussion :

[cdurep]

Bonjour,

J'ai encore besoin de votre aide sur la fonction .Find : comment obligre la recherche sur l'égalité stricte du critère de recherche.
Exemple je recherche "Expertise Plateforme". Comment faire pour que la fonction s'arrête à la rencontre de la première cellule qui contient "Expertise Plateforme" et non sur la première qui contient le mot "Expertise" ou "Plateforme".

J'ai essayé avec wholeword, mai j'ai une erreur 13 d'incomptabilité de type !

Code :

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

1
2
3
4
searchrange = "Q4:IJ4"
With Sheets("Prévisionnel").Range(searchrange)
    colsuiviprev = .Find(tache, wholeword = True, LookIn:=xlValues).Column
End With

Merci d'avance.

[Marc-L]

Bonjour, bonjour,

pour la programmation cela se passe dans le forum dédié Macros & VBA Excel !

Astuce : utiliser l'Enregistreur de macros en effectuant la recherche depuis la feuille de calculs
et évidemment en renseignant bien les options de sa fenêtre livre le code sur un plateau !

Sinon rien qu'en lisant l'aide de la méthode Range.Find … (LookAt !)