Recherche verticale améliorée

Donc suite, j'ai reussi à faire évoluer ma fonction, ceci avec l'aide de plusieurs personne sur ce site et je pense arriver donc à la version finale:

EN VBA

Function Suite(CoRésul As Range, Coentrée As Range, Réfé As Variant)

'CoRésul sélectionner la plage de la colonne de résultat recherché

'CoEntrée sélectionner la plage de la colonne de valeur à comparer à la référence

'Réfé sélectionner une cellule de référence

With Application.WorksheetFunction

Suite = .Index(CoRésul, .Match(1, .Frequency(Réfé, Coentrée), 0), 1)

End With

End Function

En fonction de base

=INDEX(B1:B4;EQUIV(1;FREQUENCE(D1;A1:A4);0);1)

Voilà je vous remercie pour votre aide, sans quoi je n'y serai pas arrivé

j'ai maintenant ma fonction opérationnelle, mais pour que d'autres personnes que moi puisse l'utiliser facilement j'aimerai donner des explications quand on clic sur Corésul Coentrée Réfé dans ma macro VBA, seulement en entrant la 1ere fois ma macro et pas à chaque réactualisation

Est ce possible?