Erreur incompatibilité de type avec une fonction

Bonjour,

j'ai un problème qui devient récurrent dans tout ce que j'essaie de faire : excel me signale une "incompatibilité de type". Je ne parviens pas à trouver l'incompatibilité en question.

Je testai cette procédure :

Sub Test()
Range("F2").Value = Application.Sum(Range(RefCell(Sheets("Evènements"), "coucou")).EntireColumn)
End Sub

RefCell étant une fonction que j'ai créé et qui se trouve si dessous (il y avait peut-être plus simple mais ça fonctionne !) :

'Fonction qui trouve la référence de la cellule contenant la valeur (TEXT !) cherchée (fonctionne uniquement pour une seule occurrence de la valeur)

Function RefCell(MonTableau As Range, Text As String)
    Dim MaCellule As Range
    For Each MaCellule In MonTableau
        If InStr(1, MaCellule, Text) = 1 Then
            RefCell = MaCellule.Address
            Exit Function
        End If
    Next MaCellule
End Function

L'objectif est de faire la somme de toutes les valeurs d'une colonne, en donnant la plage dans laquelle doit se trouver la colonne et son nom (donc valeur dans sa première cellule).
Je souhaiterais ensuite faire une boucle me permettant d’exécuter cela sur une liste de feuilles mais on va y aller étape par étape.

Merci par avance pour votre aide !