Juntar TODAS as ABAS de Planilha Excel em UMA ÚNICA GUIA via Macro VBA

[@AndersonAndrade-y7x]

Muito bom, precisava montar uma BD e usei sua lógica. Obrigado

[@CanalSGP]

Obrigado.

[@naideleandro-bw5ur]

Parabéns! Aula bem explicada, sem enrolação. ❤

[@CanalSGP]

Obrigada pelo elogio

[@mps07]

Vídeo Excelente. Muito didático. Parabéns!!

[@CanalSGP]

Obrigado.

[@renatolannessampaio7929]

Cara, Muito obrigado!!!!!! Com uns ajustes para se adequar à minha realidade, funcionou bonito!!!!! De verdade, obrigado!!!!!

[@CanalSGP]

Que bom que deu certo.

[@lucianogandolfo]

Sua didática é sensacional!

[@CanalSGP]

Obrigado pelo elogio

[@jwartha1]

Show de bola, parabéns e obrigado por compartilhar o conhecimento

[@CanalSGP]

Obrigado.

[@luizcsfilho]

Consegui muito obrigado, ótima vídeo aula nível avançado.

[@CanalSGP]

Obrigado

[@MineiroBrasil]

Que vídeo Top!

[@CanalSGP]

Obrigado.

[@fabiocoelho7836]

Show professor!!!😀

[@CanalSGP]

Obrigado

[@3434aninha1]

EXCELENTE! Me ajudou muito!!!

[@CanalSGP]

Que bom que ajudou

[@nervalsouzakrettli7072]

Ótima dica Parabéns para no caso se fossemos trazer também no nome da aba em que está sendo copiado os dados como seria feito no seu código?

[@CanalSGP]

Bom dia, obrigado, o código para capturar o nome da aba é por exemplo, Planilha1.Name

[@nervalsouzakrettli7072]

@@CanalSGP mais em qual etapa do codigo insiro?

[@nervalsouzakrettli7072]

Por exemplo seria possivel trazer na aba consolidado na coluna de aba está sendo copiado esses dados?

[@CanalSGP]

Boa noite, após a linha de código que insere o array na planilha coloque o comando abaixo. 'após esta linha Planilha3.Range("A" & Linha & ":" & "G" & Linha).Resize(TL - 1) = Arr 'Linha para colocar nome da aba na coluna H Planilha3.Range("H" & Linha & ":" & "H" & Linha).Resize(TL - 1) = NomeGuia

[@nervalsouzakrettli7072]

@@CanalSGP Acabei de testar conforme voçê orientou e deu certo muito Obrigado! Vou adaptar à minha planilha.

[@ricardomazzali6737]

Olá, fiz e funcionou muito bem....Parabéns!!! Só tenho um problema: quando abro outra planilha, a macro fica funcionando nas duas e isso eu não queria! Poderia me ajudar?

[@CanalSGP]

Bom dia, obrigado, se a macro foi colocada em uma arquivo deveria funcionar apenas nele.

[@grupodeestudosdedireitoele8430]

boa tarde! Precisava muito que incluisse a função soma de valores nessa macro. Na aba consolidação com a soma dos valores das outras planilhas. No meu caso seria na coluna G e H que tem valores.

[@CanalSGP]

Boa tarde, depende de onde quer colocar o resultado da soma. Por exemplo, na célula G1. Planilha1.Range("G1").Value = WorksheetFunction.Sum(Planilha1.Range("G2:G1000000"))

[@grupodeestudosdedireitoele8430]

@@CanalSGP boa noite! Então, eu preciso somar quatro tabelas, com dados de amostras de despesas, e compila-los na Planilha 5. Eu fiz a compilação usando seu modelo, e uma outra macro de soma, mas às vezes trava, e quando eu limpo os dados das 4 planilhas, a consolidação ainda fica, creio que seja por conta da função soma que coloquei que deve estar "segurando". Não tem como saber qual célula ficaria a soma, pois seria na última linha da Planilha 5 (consolidação). após todos os dados serem puxados. Se puder ajudar, agradeço muito. 🙏🙏

[@CanalSGP]

Bom dia, depois de consolidar os dados em uma aba acredito que seja o caso de colocar uma tabela dinâmica em outra aba, atrelada aos dados.

[@grupodeestudosdedireitoele8430]

@@CanalSGP É que na verdade eu teria que montar num relatório só a consolidação e a soma. E esse relatório é que vai ser utilizado. Para a macro, eu usei essa macro aqui: Sub sub_Somar_total_coluna_G() Dim vContador As Long Dim vTotal As Currency For vContador = 2 To Planilha5.Cells(Rows.Count, "G").End(xlUp).Row vTotal = vTotal + Planilha5.Cells(vContador, "G") Next vContador [G65000].End(xlUp).Offset(2, 0).Value = vTotal [G65000].End(xlUp).Offset(0, -1).Value = "Total...:" End Sub Será que dá para usar? Na verdade precisava incluir a coluna H também mas não consigo.

[@sandrobomediano8132]

Parabéns, único vídeo que encontrei na WEB, sobre o Assunto, excelente. Por favor, me tire uma dúvida Como ficaria o código, se além da planilha 3, eu quisesse incluir mais tres sheets, para não serem processadas no código, por exemplo: If NomeGuia Planilha1.Name Then If NomeGuia Planilha3.Name Then If NomeGuia Planilha5.Name Then If NomeGuia Planilha12.Name Then Até tentei arriscar desta forma, mas dá erro Antecipadamente agradeço

[@sandrobomediano8132]

Me desculpe, no próprio vídeo já está a solução Mais uma vez obrigado

[@CanalSGP]

Bom dia, ok.

[@tiagotozzi3781]

Ola amigo, muito bom o Video...porem no meu na planilha de dados consolidados ele sempre cola os dados em cima do outro. vc poderia me ajudar...?

[@CanalSGP]

Bom dia, provavelmente seja falha na linha de código que identifica a próxima linha vazia.

[@FabioSilva-qi3kw]

Olá..tudo bem ? Uma dúvida! Porque não é possível usar Contrl + Z em uma das abas ? Por exemplo...na plan de Jan...se eu excluir o 1º item por acidente, não consigo desfazer após clicar na aba "Dados Consolidados". Pode me explicar ?

[@CanalSGP]

Bom dia, provavelmente porque o código ocupou o espaço na memória do computador onde estava armazenado momentaneamente estes dados. Ao clicar a aba é executado o código e ele vai utilizar a memória do computador.

[@leandrocosta9150]

GOSTARIA DE COMPRAR ESSE ARQUIVO !

[@CanalSGP]

Boa tarde, solicite o arquivo de exemplo no e-mail do site do canal, link na descrição do vídeo.

[@3434aninha1]

Eu consigo cadastrar macros diferentes entre as abas, na mesma planilha?

[@CanalSGP]

Boa tarde, não entendi exatamente sua dúvida, mas se for para fazer outras macros na planilha, pode ser feito sem problema. Desde que não de conflito com o evento desta macro.

[@panzastorm8040]

Por algum motivo, após criar o macro, ele consolida apenas determinado número de informações das minhas abas, não sei onde errei.

[@CanalSGP]

Boa tarde, pode ser que seja na variável que verifica quantas linhas tem registros na aba da planilha.

[@DeboraSfernandes1]

Fiz tudo certinho mas quando aperto f8 para rodar aparece uma mensagem de erro de copilação: "Next sem For" . Como corrigir?

[@CanalSGP]

Boa tarde, pela mensagem de ter algum erro de digitação. Solicite a planilha de exemplo nos contatos do site do canal, link na descrição do vídeo.

[@leandrolamindepaulapereira9485]

Super!!

[@CanalSGP]

Obrigado

[@Eriquigoncalves]

Preciso saber o numero de todas as abas, pois estou com quase 3000 abas, é possível programar para copiar só as linhas que tem conteúdo?

[@CanalSGP]

Bom dia, neste exemplo vai buscar os dados por intervalo, se tiver linhas vazias entre os dados, vai trazer também.

[@Eriquigoncalves]

@@CanalSGP excelente, obrigado.

[@CanalSGP]

De nada

[@fabioinoue4719]

Tem algum Gerador de Catálogo PDF pelo Excel???

[@CanalSGP]

Boa tarde, não tenho modelo neste sentido.