¿Cómo convertir números a palabras en un documento de Word?

Este artículo habla sobre el método para convertir los números a palabras en inglés en un documento de Word, continúe para ver los detalles si está interesado.

Convierta número a palabras en inglés con VBA

Convierta números a palabras en inglés en Excel con Kutools for Excel

Convierta número a palabras en inglés con VBA

1. Seleccione el número que desea convertir en palabras, presione Alt + F11 llaves para abrir Microsoft Visual Basic para aplicaciones ventana.

2. Hacer clic en recuadro > Módulo, y copie los códigos siguientes y péguelos en el Módulo guión.

VBA: convierte números en palabras

Sub ConvertNumberToWord()
'UpdatebyExtendoffice20181010
    Dim xDigit As Double
    Dim xBuff As String
    On Error Resume Next
    Selection.MoveLeft wdWord, 1, wdMove
    Selection.MoveRight wdWord, 1, wdExtend
    xDigit = Val(Trim(Selection.Text))
    If xDigit = 0 And Str(xDigit) <> Trim(Selection.Text) Then Exit Sub
    If xDigit > 999999 Then
        If xDigit <= 999999999 Then
            xBuff = Trim(Int(Str(xDigit / 1000000)))
            Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + xBuff + " \* CardText", True
            Selection.MoveLeft wdWord, 1, wdExtend
            xBuff = Selection.Text & " million "
            xDigit = Right(Str(xDigit), 6)
        End If
    End If
    If xDigit <= 999999 Then
        Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + Str(xDigit) + " \* CardText", True
        Selection.MoveLeft wdWord, 1, wdExtend
        xDigit = xBuff & Selection.Text
        Selection.TypeText xDigit + " "
    Else
        MsgBox "Number too large", vbOKOnly, "Kutool for Word"
    End If
End Sub

3. Prensa F5 para ejecutar el código, ahora el número se ha convertido en palabras.
número de documento a la palabra 1

Nota： El código solo funciona en un número cada vez.

Convierte números a palabras en inglés con Kutools for Excel

Si desea convertir números a palabras en una hoja de Excel, hay una herramienta útil: Números a palabras of Kutools for Excel, que puede convertir números a palabras en inglés o chino, o convertir números a moneda inglesa o china.

Kutools for Excel, con más de 300 funciones prácticas, facilita su trabajo.

Descargar gratis
gratis con todas las funciones en 30 días

Después instalación gratuita Kutools for Excel, haz lo siguiente:

1. Seleccione las celdas en las que desea convertir números en palabras, luego haga clic en Kutools > Content > Números a palabras.
número de documento a la palabra 1