Validar solo texto visual

Hola tengo el siguiente código pero cuando lo ejecuto sale un error:
Public Function VLetras(ByVal Tecla As Integer) As Integer
Dim strValido As String
'letras no validas: .*-}¿'!%&/()=?¡]¨*[Ññ;:_ áéíó
strValido = "qwertyuioplkjhgfdsazxcvbnmQWERTYUIOPASDFGHJKLZXCV BNM, "
If Tecla > 26 Then
If InStr(strValido, Chr(Tecla)) = 0 Then
Tecla = 0
End If
End If
VLetras = Tecla
End Function
Código Botón:
KeyAscii = VLetras(KeyAscii)
El error es que Vletras dice que no esta declarado. ¿Qué debo hacer?
Mil gracias.