Clique abaixo no botão Copiar
texto.
Na planilha, clique com o botão direito do
mouse onde esta escrito Plan1 e escolha a opção Exibir Código
conforme figura abaixo

Após clicar em Exibir Código,
vamos obter a seguinte tela.

Clique no segundo botão e insira
um módulo.

Note que esta selecionado Módulo1
e o seu cursor esta na linha logo abaixo a palavra (Geral)

Neste ponto, dê um CTRL+V (Control V) para
colar o texto copiado
Clique na parte superior
esquerda (figura do Excel) para retornar à planilha

Na célula A1 digite
12345678901
Clique na célula B1 (local onde
vamos colocar o texto alterado)
Clique em Fx

Em categoria selecione a opção
Definida pelo usuário, escolha CNPJ e clique em Ok.

Em Argumentos da função digite A1
(local onde esta o nosso valor) e tecle Ok

Você irá obter o resultado
conforme a figura abaixo

Para testar um CNPJ inválido digite
41234567000195

|