fonction VB dans un update

bonjour
j'ai une requete sql executant une fonction en VB
ça me met que "Fonction 'majcdap' non définie dans l'expression. (Erreur 3085)"
quelqu'un peut m'aider????
merçi d'avance
la requete:
UPDATE essemaj SET essemaj.[Cols Durs années précéd] = majcdap([cdap],[cd],[an]), essemaj.[A déclarer] = No, essemaj.CD = 0;
la fonction:
Public Function majcdap(cdap As String, cd As Integer, an As Double) As String
       an = an Mod 100
    Select Case cd
    Case 0
        majcdap = cdap
    Case 1
        If IsNull(cdap) Then
            majcdap = cdap
        Else: majcdap = "0" & an & "," & cdap
        End If
    Case Else
        If IsNull(cdap) Then
             majcdap = cd & "." & "0" & an
         Else: majcdap = cd & "." & "0" & an & "," & cdap
         End If
    End Select
End Function