Ir ao conteúdo
  • Cadastre-se

Evaristo_br

Membro Júnior
  • Posts

    5
  • Cadastrado em

  • Última visita

Tudo que Evaristo_br postou

  1. Bom dia, amigos!! Depois de muito procurar na internet, resolvi buscar ajuda aqui no fórum, espero que consiga! Estou com o seguinte erro no Excel toda vez que abro o programa (imagem em anexo). - A pasta de trabalho possui macros que fazem integração com o Word, justo este arquivo que está aparecendo o nome. - Além disso, inseri este mesmo doc como objeto no Excel, deletei após um tempo. Acredito que uma dessas informações pode ser a causa do problema, mas não sei como resolvê-lo Posso dar mais esclarecimentos, se precisar. Grato!
  2. Boa tarde, amigos. Por causa de uma demanda pessoal tive que montar uma planilha de busca de CNPJ e CEP automaticamente. Está longe de ficar perfeita, porém tenho certeza que compartilhar vai ajudar muitos!! Usei a função SERVIÇOWEB, junto com os webservices https://www.receitaws.com.br e viacep.com.br. Se tiver algo a acrescentar ou corrigir, comente! A intenção é compartilhar gratuitamente!!! CNPJ E CEP AUTOMÁTICO.xlsx
  3. Boa tarde, amigos. Sendo novato no VBA, dei uma procurada na internet e não achei um tópico para me ajudar. Vamos lá! Tenho várias planilhas que estão ocultas, serão reexibidas e depois ocultas novamente. Não são todas, só algumas. Para ocultar elas é tranquilo, mas como não estarão ativas depois do processo, não consegui ativá-las (em conjunto). Fico no aguardo!! adicionado 16 minutos depois 'declara a variável que vai conter cada uma das planilhas ocultas Dim planilha_oculta As Variant 'cria o loop, para cada planilha que está dentro do agrupamento vai ficar visível. For Each planilha_oculta In Array("CADASTRO_BASE", "Instruções", "Código Contratante", "Inconsistências", "Validação Endereço", "Tabela CBO") Sheets(planilha_oculta).Visible = True 'vai pra próxima planilha até a última Next 'para ocultar todas elas, seleciona o agrupamento e o torna oculto Sheets(Array("CADASTRO_BASE", "Instruções", "Código Contratante", "Inconsistências", "Validação Endereço", "Tabela CBO")).select ActiveWindow.SelectedSheets.Visible = False Depois de um tempinho pesquisando, achei num fórum por aí kkkk Deixei bem explicadinho, pra quem é novato sabe a diferença que faz, acaba aprendendo algo novo!!
  4. @osvaldomp valeu amigo, n tinha pensado nessa alternativa kkkk
  5. Olá, amigos. Preciso de uma ajuda pequena: Como faço para retornar no VBA a letra do drive da pasta de trabalho? Por exemplo: C, D ou E Tentei ThisWorkbook.DriveLetter mas acho que não é propriedade pra isso. Agradeço desde já!

Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas comunidades sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×
×
  • Criar novo...