Fonction Recherche Fermé

Question

Bonjour, 

J'aimerais créé une macro VBA excel permettant de recherchait un terme renseignait par l'utilisateur, cependant je n'arrive pas à faire fonctionner mon code...

Le voici:

Function Recherche_1_terme(cible As String) As Range
' Fonction qui renvoie le 1er range contenant le terme cible
' Exemple d'appel : Set x = Recherche_1_terme("toto")  avec x le range contenant "toto"
Set Recherche_1_terme = Range("a1:zz250").Find(cible)
End Function


Pouvez-vous m'aidez ? Merci

gbinforme · Answer

Bonjour,

Comme ceci cela devrait mieux fonctionner :
Function Recherche_1_terme(ByVal cible As String) As Range
' Fonction qui renvoie le 1er range contenant le terme cible
' Exemple d'appel : Set x = Recherche_1_terme("toto")  avec x le range contenant "toto"
Set Recherche_1_terme = Range("a1:zz250").Find(cible)
End Function

Fonction Recherche

1 réponse

Discussions similaires

Newsletters