Conversor de cifras a letras en Word
En una respuesta de Julio (nombre con el que firma de uno de los expertos) se propone la siguiente macro para convertir una cifra a letra en Word.
Dim numero As String
numero = InputBox("Escriba el numero a convertir")
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"= " & numero & "\*cardtext", PreserveFormatting:=True
Selection.TypeText Text:=
End Sub.
Lo que me gustaría conocer son dos cosas. La primera como se introducen los decimales, ya que en la macro anterior solo se convierten números enteros, y la segunda pregunta es como podemos hacer para que la cantidad en letra salga directamente toda en letras mayúsculas.
Muchas gracias y enhorabuena por esta página tan buena.
Dim numero As String
numero = InputBox("Escriba el numero a convertir")
Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
"= " & numero & "\*cardtext", PreserveFormatting:=True
Selection.TypeText Text:=
End Sub.
Lo que me gustaría conocer son dos cosas. La primera como se introducen los decimales, ya que en la macro anterior solo se convierten números enteros, y la segunda pregunta es como podemos hacer para que la cantidad en letra salga directamente toda en letras mayúsculas.
Muchas gracias y enhorabuena por esta página tan buena.
{"lat":40.134523439075,"lng":-3.59375}
