Utilisation Fonction dans Excel

Bonjour,

J'ai un problème tout c.. mais je n'arrive pas à trouver ce qui cloche...

J'ai une fonction ESTFERIE que je souhaite utilliser mais elle ne semble pas reconnue.

Je l'ai mise dans un module de mon classeur (dans les déclarations, et j'ai même mis dans le classeur pour tester).

Quand je saisis =ESTFERIE(B4) avec B4 contenant une date, j'ai une erreur #NOM?

Voici la fonction 

Public Function ESTFERIE(d As Date) As Boolean
    Dim annee As Integer
    Dim paques As Date
    
    annee = Year(d)
    
    ' Algorithme de calcul de Pâques
    Dim a, b, c, d_p, e, f, g, h, i, k, l, m, n, p As Integer
    a = annee Mod 19
    b = Int(annee / 100)
    c = annee Mod 100
    d_p = Int(b / 4)
    e = b Mod 4
    f = Int((b + 8) / 25)
    g = Int((b - f + 1) / 3)
    h = (19 * a + b - d_p - g + 15) Mod 30
    i = Int(c / 4)
    k = c Mod 4
    l = (32 + 2 * e + 2 * i - h - k) Mod 7
    m = Int((a + 11 * h + 22 * l) / 451)
    n = Int((h + l - 7 * m + 114) / 31)
    p = (h + l - 7 * m + 114) Mod 31
    paques = DateSerial(annee, n, p + 1)

    ' Verification des jours feries
    Select Case d
        Case DateSerial(annee, 1, 1), DateSerial(annee, 5, 1), DateSerial(annee, 5, 8), _
             DateSerial(annee, 7, 14), DateSerial(annee, 8, 15), DateSerial(annee, 11, 1), _
             DateSerial(annee, 11, 11), DateSerial(annee, 12, 25), _
             paques + 1, paques + 39, paques + 50
            ESTFERIE = True
        Case Else
            ESTFERIE = False
    End Select
End Function

Merci de m'enlever la peau de saucisson que j'ai devant les yeux...

A+

Windows / Chrome 154.0.0.0