Macro para convertir numero a letras

Hola expertos:
necesito  un macro para convertir números a letras, pero que sea un  macro, no una función
preferiblemente si se pudiera desde un userform, para que al escribir el numero en el textbox se pueda colocar en la celda a1 en letras, olvidaba que el formato sea de la siguiente forma ej. Doscientos cuarenta y cinco 25/100 Quetzales.ya que el quetzal, es la moneda de Guatemala 
si pueden ayudarme se los voy a agradecer