9 Formas Incríveis de Criar Formatação de CNPJ no Excel

Olá! Tudo bem? Bem-vindo (a) ao Excel 24 Horas! Hoje vou te ensinar 9 Formas Incríveis de Criar Formatação de CNPJ no Excel. Seja com fórmulas, formatação de células ou até mesmo VBA, você verá que existem várias maneiras de trabalhar com isso de forma eficiente. Vamos juntos aprender e melhorar ainda mais sua produtividade?

1. Usando a função TEXTO para criar a Formatação do CNPJ

Primeiramente, a forma mais comum e prática de formatar um CNPJ é usando a função TEXTO.

• Imagine o número 12345678000195 na célula A1. Lembrando que sempre um CNPJ possui 14 dígitos.
  Na célula B1, insira a fórmula:

=TEXTO(A1;"00\.000\.000\/0000\-00")

Resultado: 12.345.678/0001-95.

A função TEXTO usada acima tem a propriedade de formatar textos de acordo com os parâmetros que você inserir dentro de seus parênteses.

No nosso caso, pegamos como referência o conteúdo da célula A1, onde estão os números sem formatação e após o ponto-e-vírgula, inserimos a formatação desejada entre aspas duplas, descrevendo exatamente qual é o formato do número desejado, que nesse caso é o CNPJ (00\.000\.000\/0000\-00).

Neste momento se você prestou atenção no formato do número deve ter percebido que tem barras invertidas antes dos pontos, da barra normal e do hífen.

Vamos explicar o porquê disso!

A barra invertida ( \ ) é um caractere de escape usado no Excel para indicar que o próximo caractere deve ser tratado como literal, ou seja, parte do texto e não como um comando especial.

Ou seja, O ponto ( . ), a barra ( / ) e o traço ( – ) são usados como separadores no formato de CNPJ, por padrão, o Excel pode interpretar esses caracteres como instruções ou formatações especiais.

Para garantir que eles sejam tratados como texto literal e apareçam no resultado final, usamos a barra invertida antes deles:

• \. diz ao Excel que queremos um ponto literal.
• \/ faz o mesmo para a barra.
• – escapa o traço.

Por que não usamos \ para os números?

Os números ( 0 ) não precisam de barra invertida porque o Excel já os interpreta como parte do formato numérico.

Entendido esta parte? Agora vamos para a segunda parte da nossa aula sobre Formatação de CNPJ.

2. Formatação personalizada de células

Outra forma é formatar diretamente a célula.

• Primeiro, selecione a célula ou coluna que contém os números do CNPJ.

• Em seguida, clique com o botão direito do mouse e escolha a opção Formatar Células.

• Depois disso, vá até a aba Número e selecione a categoria Personalizado.

• Por fim, insira o seguinte formato no espaço Tipo:

00\.000\.000\/0000\-00

Agora os números serão exibidos no padrão de CNPJ.

3. Fórmulas com CONCATENAR e EXT.TEXTO

Se você achou que a função TEXTO fácil demais e quer se aventurar mais no Excel, uma alternativa é criar a formatação do CNPJ manualmente.

Para começar, na célula A1, insira o número 12345678000195.

Em seguida, na célula B1, insira a seguinte fórmula:

=EXT.TEXTO(A1;1;2)&"."&EXT.TEXTO(A1;3;3)&"."&EXT.TEXTO(A1;6;3)&"/"&EXT.TEXTO(A1;9;4)&"-"&EXT.TEXTO(A1;13;2)

Resultado: 12.345.678/0001-95.

Na prática ficará como na imagem abaixo.

Se você entendeu a fórmula, pode pular para a próxima forma de formatação de CNPJ que é a Utilizando VBA para formatar automaticamente. No entanto, se não entendeu, aqui está uma breve explicação.

Como funciona a fórmula?

A função EXT.TEXTO serve para extrair uma parte de um texto em uma célula. Sua sintaxe é a seguinte: EXT.TEXTO(texto; início; núm_caract).

Ou seja, “texto” é a célula que contém o texto, “início” é a posição do primeiro caractere a ser extraído e “núm_caract” é o número de caracteres que você quer pegar a partir dessa posição.

Diante disso, temos:

1. EXT.TEXTO(A1;1;2): Primeiramente, essa função pega os dois primeiros números de A1 (no caso, “12”).
2. EXT.TEXTO(A1;3;3): Em seguida, a função pega os três números que estão nas posições 3 a 5 de A1 (no caso, “345”).
3. EXT.TEXTO(A1;6;3): Depois disso, ela pega os números das posições 6 a 8 de A1 (no caso, “678”).
4. EXT.TEXTO(A1;9;4): Aqui, a função pega os quatro números das posições 9 a 12 de A1 (no caso, “0001”).
5. EXT.TEXTO(A1;13;2): Por fim, ela pega os dois últimos números, nas posições 13 a 14 de A1 (no caso, “95”).

E o &?

O & é um operador de concatenação. Basicamente, ele simplesmente junta as partes que você selecionou com a função EXT.TEXTO.

• O primeiro & junta o número “12” com o ponto “.”.
• O segundo & junta “345” com o ponto “.” novamente.
• E assim por diante, até que o CNPJ esteja completamente formatado.

Resultado final

A fórmula vai transformar o número 12345678000195 em 12.345.678/0001-95, ou seja, no formato correto de um CNPJ.

4. Utilizando VBA para formatar automaticamente

Se você prefere facilitar o trabalho no Excel, o VBA é, sem dúvida, uma excelente solução para automatizar tarefas.

Além disso, com apenas alguns passos simples, é possível criar um código que formata automaticamente uma lista de CNPJs no padrão correto.

Assim sendo, veja abaixo como fazer isso de maneira prática e eficiente:

1. Pressione ALT + F11 e insira o código abaixo:

Sub FormatarCNPJ()
    Dim celula As Range
    For Each celula In Selection
        If IsNumeric(celula.Value) Then
            celula.Value = Format(celula.Value, "00\.000\.000\/0000\-00")
        End If
    Next celula
End Sub

2. Volte para o Excel, selecione os números e execute o código.
   Resultado: Todos os CNPJs serão formatados diretamente.

Em suma, com esse código VBA, você pode economizar tempo e padronizar facilmente os CNPJs em suas planilhas.

Portanto, aprender VBA é uma ótima forma de automatizar tarefas repetitivas no Excel.

5. Formatação condicional com VBA

Existe mais uma maneira usando o VBA para a formatação de CNPJ no Excel. E esta forma é criando uma condicional para que sejam formatados apenas os números com 14 dígitos.

Veja o código abaixo:

Sub FormatarCNPJCondicional()
    Dim celula As Range
    For Each celula In Selection
        If Len(celula.Value) = 14 Then
            celula.Value = Format(celula.Value, "00\.000\.000\/0000\-00")
        End If
    Next celula
End Sub

Copie e cole esse código no seu Editor do VBA e veja a mágica acontecer.

Assim, números com menos ou mais dígitos não serão alterados.

6. Dividindo o CNPJ em partes e formatando

Quer entender cada parte do CNPJ?

1. Na célula B1, insira os dois primeiros dígitos:

=EXT.TEXTO(A1;1;2)

2. Em C1, os três seguintes:

=EXT.TEXTO(A1;3;3)

3. Continue até completar o formato.
   Depois, use o CONCATENAR para juntar tudo:

=B1&"."&B2&"."&B3&"/"&B4&"-"&B5

7. Inserindo máscara em formulário com VBA

Se você utiliza formulários no Excel, considere aplicar este código para mascarar os números. Afinal, isso ajuda quando o usuário digita um CNPJ sem ponto, barra ou traço, e você precisa garantir que esses caracteres sejam adicionados automaticamente.

Private Sub TextBox1_Change()
    Dim Texto As String
    Texto = TextBox1.Text
    Texto = Replace(Texto, ".", "")
    Texto = Replace(Texto, "/", "")
    Texto = Replace(Texto, "-", "")
    If Len(Texto) = 14 Then
        TextBox1.Text = Format(Texto, "00\.000\.000\/0000\-00")
        TextBox1.SelStart = Len(TextBox1.Text)
    End If
End Sub

8. Inserindo formatação com Power Query

O Power Query, sem dúvida, é uma poderosa ferramenta do Excel para manipulação e transformação de dados, permitindo automatizar processos com poucos cliques.

Além disso, com ele, você pode limpar, organizar e até formatar informações de forma prática e eficiente, sem precisar de fórmulas complexas.

Agora, veja como usar o Power Query para formatar CNPJs em sua planilha:

1. Importe a tabela no Power Query.
2. Adicione uma Coluna Personalizada e insira:

Text.Combine({Text.Start([CNPJ],2),".",Text.Middle([CNPJ],2,3),".",Text.Middle([CNPJ],5,3),"/",Text.Middle([CNPJ],8,4),"-",Text.End([CNPJ],2)})

Resultado: CNPJs formatados.

9. Formatação com Função Personalizada VBA

Também é possível usar a formatação de CNPJ, criando uma função personalizada no VBA. Ou seja, nesse caso, você conseguirá usar como se fosse a função SOMA, PROCV e SOMASE nativas do Excel.

Portanto, copie e cole o código abaixo em um módulo do Editor do VBA.

Function FormatarCNPJ(CNPJ As String) As String
    If Len(CNPJ) = 14 Then
        FormatarCNPJ = Format(CNPJ, "00\.000\.000\/0000\-00")
    Else
        FormatarCNPJ = "Inválido"
    End If
End Function

Depois, volte ao Excel e digite a função abaixo.

=FormatarCNPJ(A1)

Conclusão

Agora você conhece 9 formas diferentes de formatar CNPJs no Excel! Qual delas você achou mais interessante? Já conhecia alguma? Poste suas dúvidas ou sugestões nos comentários, e vou te ajudar com o maior prazer.

No mais, muito obrigado pela companhia e um fortíssimo abraço! Até a próxima! 😊