Bonjour,

Je souhaite faire une fonction utilisable dans la barre de formule excel...(alors déjà est ce que c'est faisable?). Cette fonction marcherait comme la fonciton recherchev(...) mais en argument on metterai la cellule dont la valeur est recherchée, la table dans laquelle on cherche,et surtout:
le nombre de ligne et de colonne que l'on souhaite rajouter à l'adresse de la cellule que la fonction à trouvé pour qu'il nous retourne la valeur de cette nouvelle celulle.
Comme rien ne vaut un bonne exemple: si on met add_ligne =1 et add_colonne=2, au lieu de nous retourner la valeur de "B2" il nous retourne la valeur de "C4".

Pour cela j'ai donc codé :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
Public Function perso_recherche(Cellule, Table, add_ligne, add_colonne)
Dim ligne As Integer
Dim col As Integer
Dim feuil As String
Set celluletrouvee = Range(Table).Find(Cellule.Value, lookat:=xlWhole)
 
ligne = celluletrouvee.Row + add_ligne
col = celluletrouvee.Column + add_colonne
feuil = celluletrouvee.sheets
 
rjgj_recherche = sheets(feuil).Cells(ligne, col).Value
End Function
Mais ca me retourne un #VALEUR!

Que faire?

Merci par avance