Skip to main content

Kutools para Office — Uma Suíte. Cinco Ferramentas. Aumente sua Produtividade.

Como converter números em palavras em um documento do Word?

Author Sun Last modified

Este artigo discute o método para converter números em palavras em inglês em um documento do Word. Continue lendo para ver os detalhes, se estiver interessado.

Converter número em palavras em inglês com VBA

Converter número em palavras em inglês no Excel com Kutools para Excel


Converter número em palavras em inglês com VBA

1. Selecione o número que deseja converter em palavras, pressione as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e copie o código abaixo, colando-o no script do Módulo.

VBA: Converter número em palavras

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. Pressione F5 para executar o código. Agora, o número foi convertido em palavras.
Number converted to English words

Observação: O código funciona apenas para um número de cada vez.


Converter número em palavras em inglês com Kutools para Excel

Se você quiser converter números em palavras em uma planilha do Excel, há uma ferramenta prática - Numbers to Words do Kutools para Excel, que pode converter números em palavras em inglês ou chinês, ou converter números em moeda em inglês ou chinês.

Kutools para Excel,equipado com IA 🤖, oferece mais de 300 recursos práticos para simplificar suas tarefas.

Após instalar gratuitamente o Kutools para Excel, siga os passos abaixo:

1. Selecione as células que deseja converter números em palavras e clique em Kutools > Texto > Numbers to Words.
Numbers to Words option on the Kutools tab on the Excel ribbon

2. Na caixa de diálogo que aparece, marque Inglês e Não converter para moeda opções.
Numbers to Words dialog box

3. Clique em Ok ou Aplicar, os números selecionados serão convertidos em palavras.

Melhores Ferramentas de Produtividade para Office

Kutools for Word – Aprimore sua experiência no Word com mais de 100 recursos incríveis!

🤖 Funcionalidades de IA do Kutools: AI Assistant / Assistente em Tempo Real / Super Polir (Preservar Formato) / Super Traduzir (Preservar Formato) / Redação por IA / Revisão por IA...

📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Exportar Seleção em vários formatos (PDF/TXT/DOC/HTML...) / Converter em Lote para PDF...

Edição de Corpo: Localizar e Substituir em Lote em múltiplos arquivos / Redimensionar todas as Imagens / Transpor Linhas e Colunas de Tabela / Converter Tabela para Texto...

🧹 Limpeza Fácil: Elimine Espaços Extras / Quebras de Seção / Caixas de Texto / Hiperlinks / Para mais ferramentas de Remover, acesse o grupo Remover...

Inserções Criativas: Inserir Delimitadores de Milhares / Caixas de Seleção / Botões de Rádio / Código QR / Código de Barras / Múltiplas Imagens / Descubra mais no grupo Inserir...

🔍 Seleções Precisas: Localize Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos de Selecionar...

Melhorias Destacadas: Navegue para qualquer Intervalo / Insira Texto Repetitivo automaticamente / Alternar entre Janelas de Documento /11 ferramentas de Conversão...

🌍 Compatível com40+ Idiomas: Use Kutools no seu idioma preferido — compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 outros!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Quer experimentar esses recursos? Baixe o Kutools for Word agora! 🚀
 

✨ Kutools for Office – Uma Instalação, Cinco Ferramentas Poderosas!

Inclui Office Tab Pro · Kutools para Excel · Kutools para Outlook · Kutools for Word · Kutools for PowerPoint

📦 Tenha todas as5 ferramentas em uma única suíte | 🔗 Integração perfeita com o Microsoft Office | ⚡ Economize Tempo e aumente a produtividade imediatamente

Melhores Ferramentas de Produtividade para Office

Kutools for Word – 100+ ferramentas para Word