Fonction Recherche

Meliodas54 Messages postés 13 Date d'inscription   Statut Membre Dernière intervention   -  
gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   -
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

1 réponse

gbinforme Messages postés 14946 Date d'inscription   Statut Contributeur Dernière intervention   4 724
 
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

0