¿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.
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. |
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.
2. En el cuadro de diálogo emergente, marque Inglés y No convertido a moneda .
3. Hacer clic en Ok or Aplique, los números seleccionados se convertirán en palabras.
Las mejores herramientas de productividad de oficina
Kutools for Word - Mejore su experiencia con Word con Over 100 ¡Características notables!
Sumérgete en las funciones resaltadas a continuación o haga clic aquí para explorar todo el poder de Kutools for Word.
📘 Dominio del documento: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/XLSX) / Convertir por lotes a PDF / Exportar páginas como imágenes / Imprima varios archivos a la vez ...
✏ Edición de contenidos: Buscar y reemplazar por lotes en varios archivos / Cambiar el tamaño de todas las imágenes / Transponer filas y columnas de tabla / Convertir tabla en texto ...
🧹 Limpieza sin esfuerzo: barrer Espacios extra / Saltos de sección / Todos los encabezados / Cuadros de texto / Los hipervínculos / Para obtener más herramientas de eliminación, diríjase a nuestro grupo de eliminación
➕ Inserciones creativas: recuadro Mil Separadores / Casillas de verificación / Botones de radio / Código QR / Barcode / Tabla de líneas diagonales / Título de la ecuación / Captura de imagen / Pie de tabla / Varias imágenes / Descubra más en nuestro Grupo Insertar
🔍 Selecciones de precisión: Identificar páginas específicas / tablas / formas / párrafos de encabezado / Navega con facilidad usando nuestro Grupo Selecto
⭐ Mejoras de estrellas: Navegue rápidamente a cualquier ubicación / insertar automáticamente texto repetitivo / alternar sin problemas entre ventanas de documentos / 11 herramientas de conversión ...
Transforma tus tareas de Word con Kutools. 👉 Descargue con prueba de 30 días ahora 🚀.
