Consulta CNPJ Receita
Um dos melhores recursos já lançados para o Excel, com certeza são os suplementos Power. (Power Query, Power Pivot e Power View). Para saber o que é Power Query veja mais no artigo O que é Power Query e como Instalar este suplemento leia o artigo Como Instalar o Power Query no Excel .
Podemos fazer milagres com estes suplementos. Com o Power Query por exemplo podemos nos conectar a várias fontes de dados, inclusive as API’s para extrair informações online. Hoje vou mostrar como conectar via API ao site da receita para fazer consulta cnpj receita. E a grande vantagem é que você pode consultar vários CNPJ’s de uma única vez e não necessita de VBA.
Criando uma Tabela com os CNPJ
O que vamos fazer é criar uma tabela, nomear com o nome tCNPJ e inserir os números de CNPJ que desejamos consultar.
Digite CNPJ na célula A1, depois digite a lista de CNPJ abaixo.
Selecione a célula A1 até a última célula com CNPJ. (Ou clique na célula A1 e use a tecla de atalho CTRL + * para selecionar todo o intervalo).
Vá na guia Inserir, Tabela deixe marcado Minha Tabela Contém Cabeçalhos e clique em OK. (Para inserir tabela pode-se usar também a tecla de atalho CTRL + ALT + T).
Depois de clique na Tabela, vá na Guia Design e no campo Nome da Tabela digite tCNPJ.
Importando dados para o Power Query
Clique na Tabela, clique na Guia Dados, Obter Dados, De Outras Fontes, Da Tabela/Intervalo.
Irá abrir o Editor de Consultas.
No Editor de Consultas, clique na Página Inicial, No Grupo Nova Consulta, clique em Nova Fonte, Outras Fontes, Web.
Na janela que abrir, deixe selecionado Básico e na URL digite o endereço a seguir se as aspas e clique em OK: “https://www.receitaws.com.br/v1/cnpj/27865757000102”. Esta é a API da Receita.
Criando Função no Power Query
O que nós vamos fazer agora é transformar em Função esta consulta da Web para buscar o CNPJ da Tabela que criamos anteriormente.
Clique na Guia Exibição e depois em Editor Avançado.
Irá abrir a tela do Editor Avançado do Power Query onde é utilizado a linguagem M.
Temos que editar esta consulta para criar uma Função Personalizada.
Antes do let vamos inserir:
(CNPJ as number) =>
Isso já transforma esta consulta em uma Função. Ainda temos que modificar o final do nosso endereço da API. Apague o número do CNPJ insira o texto abaixo após as aspas:
&Number.ToText(CNPJ)
Isto faz com que o número do CNPJ seja informado via função.
Após fazer estas alterações clique em concluído.
Altere o nome da Consulta para API, fica mais fácil de se localiza.
Invocar Função Personalizada
Agora clique na Consulta tCNPJ, vá na Guia Adicionar Colunas e clique em Invocar Função Personalizada.
No campo Consulta de função selecione API, no último campo selecione Nome da Coluna e clique em OK.
Perceba que agora foi adicionado uma nova coluna com o nome API. Perceba também que no canto superior direito é um ícone para para expandir as colunas.
Clique neste ícone, desmarque a opção Use o nome da coluna original como prefixo e clique em OK.
Perceba que foram criados várias novas colunas com os dados dos respectivos CNPJ’s. Mas há ainda colunas que podemos expandir, que são: atividade_principal, atividades_secundárias e qsa.
Clique no ícone para expandir a coluna, e selecione Expandir para Novas Linhas. Clique novamente no ícone para expandir e clique em OK.
Você também pode renomear o nome das colunas se preferir, dando duplo clique no nome da coluna.
Após estes passos clique em Fechar e Carregar.
Caso não abra uma janela de Importar Dados, Clique na Guia Dados e clique em Consultas e Conexões.
Ao lado direito da Planilha irá abrir a janela de Consultas e Conexões.
Clique com o botão direito do mouse na consulta tCNPJ e clique em Carregar para…
Irá abrir a janela de Importar Dados.
Clique na opção Tabela e clique em OK e seus dados serão carregados em uma nova planilha.
Agora podemos trabalhar com estes dados de diversas maneiras. Usando formatação condicional para deixar em vermelho os cadastros irregulares, usar Tabela Dinâmica, o Power View entre outras coisas. E aí, o que achou deste artigo? Compartilhe com seus amigos.
Assista a Vídeo Aula: