¿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 el número a palabras en inglés en Excel con Kutools para 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.
Note: El código solo funciona en un número cada vez.
Convierta el número a palabras en inglés con Kutools para Excel
Si desea convertir números a palabras en una hoja de Excel, hay una herramienta útil: Números a palabras de Kutools para 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 para Excel, haga lo siguiente:
1. Seleccione las celdas en las que desea convertir números en palabras, luego haga clic en Kutools > Contenido > 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 Aplicá, 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!
🤖 Asistente de IA de Kutools: Transforma tu escritura con IA - Generar contenido / Reescribir texto / Resumir documentos / Solicite información basado en el documento, todo dentro de Word
📘 Dominio del documento: Dividir páginas / Combinar documentos / Exportar selección en varios formatos (PDF/TXT/DOC/HTML...) / 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 extracción, diríjase a Quitar grupo...
➕ Inserciones creativas: Insertar 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 / Descubre más en el Insertar grupo...
🔍 Selecciones de precisión: Localizar Páginas Específicas / Mesas / Formas / Párrafos de encabezado / Mejorar la navegación con más, Seleccionar características...
⭐ Mejoras de estrellas: Navegar a cualquier ubicación / Insertar automáticamente texto repetitivo / Alternar entre ventanas de documentos / 11 herramientas de conversión...