Convertir Numero a Letra Access 2003

Hola buena tarde, copie un código que aquí encontré para convertir un numero a letra, les comento que inserte un cuadro de texto en el Pie del Informe y ahí puse la esto =abcednum([Texto49],"esm"), el campo Texto49 también esta en el pie del informe y es la suma de un campo que esta en el detalle, al momento de ejecutar mi informe me aparece el error de Error de compilación: No sea definido Sub o Function, n2t_tbs_es.
El código es el siguiente
Function abcednum(Num, lang As String) As String
Dim sNumero As String
Dim sN As String
Dim lPosDecimal As Integer
G_Genero_Numero = lang
Select Case lang
Case "es", "esm"
sNumero = n2t_tbs_es(Num, NUM_FEM)
Case "esm"
sNumero = n2t_tbs_es(Num, NUM_MAS)
Case "esn"
sNumero = n2t_tbs_es(Num, NUM_NEU)
Case Else
sNumero = n2t_tbs_es(Num, NUM_FEM)
G_Genero_Numero = "es"
End Select
Dim sDecimal As String * 1
' Averiguar el signo decimal
sN = Format$(25.5, "#.#")
If InStr(sN, ".") Then
sDecimal = "."
Else
sDecimal = ","
End If
' Convierte a texto el nº y obtiene la parte decimal
sN = Format(Num, "#.##")
lPosDecimal = InStr(sN, sDecimal)
' Si hay decimales los muestra con el formato de México
If lPosDecimal Then
sN = Mid$(sN, lPosDecimal + 1, 2)
sNumero = sNumero & "pesos " & sN & "/100 m.n."
End If
abcednum = sNumero
End Function
Si me podrían apoyar por favor