Descobrindo a ÚLTIMA LINHA PREENCHIDA de uma TABELA

[@HashtagTreinamentos]

Fala galera! Se você gostou do vídeo deixa sua curtida, se inscreve no canal e clica no sininho! Quer fazer um Curso Completo de VBA com a gente? Se inscreve nesse link para ser avisado quando abrirmos novas vagas para o curso: bit.ly/lista-espera-vba-youtube Para receber conteúdo diário de Excel, VBA e Power BI gratuitamente, entre em nosso grupo do Telegram: t.me/joinchat/AAAAAFVJr0C7Il-tVurdUw Para baixar o MINICURSO GRATUITO de FORMULÁRIOS NO VBA clique no link: bit.ly/2P1P44G ► Planilha utilizada no vídeo: pages.hashtagtreinamentos.com/planilha-16QILlANnTTyRqd7cyPD6l7dVxsHITUIN ► KZbin: bit.ly/2O6A4RP ► Instagram: bit.ly/2F7B6t4 ► Facebook: bit.ly/2UA4SwY ► Telegram: t.me/joinchat/AAAAAFVJr0C7Il-tVurdUw TOP Vídeos: ► Macros Excel VBA - Como criar uma Macro do Zero kzbin.info/www/bejne/q3OWhXWufahkr7M ► Como criar formulário no Excel - Criando Userform no VBA - 1/5 kzbin.info/www/bejne/eXm5aJ-ElLxnb7s ► VBA - O que é VBA? O que são Macros? kzbin.info/www/bejne/imaVkImLnMR0gbs ► Gravar macro - Minicurso Prático de Macros e VBA (1/10) kzbin.info/www/bejne/h5KccmeifLGSf8k ► Primeira Linha Vazia - Minicurso Prático de Macros e VBA (8/10) kzbin.info/www/bejne/oWe9oIWnbqakmsk

[@ademircaldo6266]

Parabens ao mestre !. melhor aula que ja assisti. sem estrelismo, ultra objetiva, didatica simples, perfeitamente inteligivel e integralmente aproveitavel. fiquei fregues. obrigado.

[@marcosflaviodeoliveiraflav9421]

CARA,,,, VC É MUUUIIITO BOM PRA EXPLICAR.... JA APRENDI,,,,

[@brandonfrancacamposmenegon9182]

Vc explica muito bem, parabéns.

[@brunodesouzadias3677]

Excelente, isso resolve inumeros problemas meus.

[@candidoprc80]

SENSACIONAL!!!!!!! era o que estava precisando para implementar minha planilha de atualização de loterias. UAU!!!! Companheiro, somente eu pediria mais uma ajudinha: sua macro recebe os dados e cola na ultima linha exatamente o que eu quero, porém no meu caso, eu criei um botão de ATUALIZAÇÃO. Se eu clicar neste botão ele insere o resultado atual na última linha em branco, é isso mesmo que que quero. No entanto, caso eu clique novamente nesse botão a macro grava na linha seguinte em branco o mesmo resultado anterior ficando desse modo com os dois últimos registros iguais. Por que resultado anterior? Eu automatizei a minha planilha para gravar o resultado da loteria OnLine obtendo dados da WEB. Até aqui tudo bem, uma vez que o resultado da loteria só sai uma vez por dia. O que eu gostaria de implementar é uma condição no código para que quando eu clicar novamente no botão ATUALIZAR a macro detecta os números anteriores, verificam se são iguais ao que se quer atualizar; caso sejam idênticos, não permite colar. Somente se o resultado for diferente do anterior. Tá meio confuso mas é por ai! Tentei colocar um if (SE) no código mas eu sou muito mas muito leigo em VB. Ajude-nos, parceiro. Obrigado de coração.

[@luis.a.a]

Parabéns pela didática. Sou programador das antigas, Clipper, Cobol e já lecionei aula de Clipper. Ótima explanação, que para mim ficou muito "BABA".

[@candidoprc80]

Eu também. (KKKK) Programei muito tempo com Clipper. Até hoje tenho uma maquina com DOS para rodar uns programinhas que fiz nos idos anos 80 (rs). Meu ídolo na época era o RAMALHO (KKKK) tenho ainda livros dele.

[@luis.a.a]

@@candidoprc80 , tenho aplicativos até hoje rodando no Clipper e com recursos inimagináveis a época. Rodo tudo em plataforma 64bits e com impressão windows. Caso queira algumas dicas: [e-mail]

[@jacksonmendes1201]

Excelente!! Parabéns pelo vídeo e obrigado!!!!!!!!!!!!

[@robsontavares]

Sextou VBA, Obrigado por compartilhar seus conhecimentos comigo.

[@ValdemYrGB]

Boa explicação! Sextou com VBA, pra mim sábadou!! Seria interessante colocar ordem de área seguido de nomes na ordem alfabética, antes de inserir novo registro.

[@adrianamartins3529]

Excelente conteúdo! Obrigada!

[@jessicanasco_]

Muito massa, fiquei um tempão tentado fazer isso sozinha, rs! Fiz um código enorme, mas travava na hora de pegar o número da linha. Obrigadap pela dica, cês são tops !!! Me ajudou bastante,

[@cintianara7519]

Amei, não tenho conhecimento vba, mas com certeza faço fácil. Prof nota 10

[@eliezerkadoshim278]

Sou apaixonado nesse canal... Parabéns a tôda à equipa!

[@lexgraf9485]

Parabéns Alon...

[@molecular1962]

muito sensacional essa aula, Alon obrigado pelo conteúdo isso vai salva o setor onde trabalho Deus te abençoe semre vlw!

[@teceof]

Hashtag show.. obrigado! Didática hiper objetiva com todos os detalhes!

[@pelizzon]

Muito bom, parabéns, simples e eficiente.

[@planeja1semec101]

# Hashtag muito pratico e instrutivo.

[@diogenesandrade3689]

muito obrigado pela aula! Deus vos abençoe mais!

[@diegocarlosnascimento1525]

parabens pela didatica fera. obrigado pelas dicas e pelo "VBAzês"

[@Vbassi54]

#somostodos12%. Excelente aula.

[@carlosbarri1957]

Sinceridade, não sei se é sextou com vba ou estou com vba, eita sotaque do carioca... na dúvida #sextoucomvba! vou pelo ouvido...

[@leoichio9071]

Magnífico!!

[@LGL_LOTERIAS]

No VBA, não sei com chegar no fim de uma tabela com céluas em branco, mais no excel posso chega com CTRL+END, vou também pra ultima celula prenechida independente de ter ou não linhas faltando preenchimento, e CTRL+HOME, volto ao topo da tabela na célula A1.#ficaadica

[@ronaldpereira1]

Top, explicação sensacional.

[@Vanderlei1948]

Excelente vídeo. Parabéns pela didática

[@claudiojunior2578]

Excelente dica como sempre!

[@mannynsousa4902]

Valeu meu irmão! DEUS te abençoe!!! 👍👍😆

[@1963nilima]

Valeu, dica excelente. Obrigado!

[@mariaisabely125]

Tem como mudar a numeração a aptir da ultima linha? Tipo a ultima 256, aí no textbox aparecer a sugestão da próxima automaticamente?

[@mrnascimento3]

Mas valeu a iniciativa, muito bom

[@weideroliveiraduarte2876]

Olá cara, eu tentei esse metodo do End(XlDown) e ele só funciona em casos onde você escolheu uma coluna onde todas as linhas estão preenchidas, logo, se por alguma razão houver intermitencia nos preenchimentos, dá erro. O metodo que uso pra saber a ultima linha é diferente, primeiro eu criei um conjunto de If e ifelse e ao final else, mandando testar blocos primeiro de 10 a 100 depois de 101 a 500, depois de 501 a 2000, e por ai vai, e testo qual o primeiro bloco desses ai me apresenta como todas as celular em branco, uso então essa primeira celula desse bloco como referencia, e mando ele vir testando em um comando FOR uma por uma cada celula de baixo para cima, e ai ele encontra realmente a ultima linha preeenchida real. A etapa dos IF elses que falei acima é funcamental, pois se você mandar testar tipo da celula 3.000 para cima, o excel demora um tempão pra achar, dai você tem que achar o primeiro bloco logo apos o preenchido e ai você acha a ultima celula rapidinho.

[@almir4567]

Engraçado...se eu começar uma tabela nova: Funcionário, Reg, Cargo...e tentar digitar na linha logo abaixo ele não funciona...tive que digitar antes uns cinco nomes, e a partir dai sim ele funciona. Existe alguma razão? Muito obrigado. Parabéns pelos vídeos...sou inscrito e curto muito o canal de vocês. Vlw.

[@jeffersonbenjamin8209]

muito boa aula, me ajudou muito!

[@gferrazdf]

Otima Dicatica, gostei da explicacao das partes, Sextou com VBA, Mudando de assunto, poderia por gentileza, tentar resolver uma implementação que estou tentando fazer. Na minha planilha, tem 02 campos, data inicial e data final, porem, a cada nova consulta, Gostaria de manter os dados da ultima consulta sql nas proximas pesquisas Bom, inseri 2 condições em forma de Alert 1º Alerta - Deseja apagar o os dados da consulta pesquisada ?, usando a rotina Plan3.Range("A4:D5000").Value = Empty Call ExecutaConsultaSQL ' Faz um Select ( PlanilhaFonte - Banco de Dados) e retorna os dados do periodo consultado na planilha de pesquisa (Destino) Problema: Toda vez que executo uma nova pesquisa, os dados sao apagados para nao sobrescreve-los e inseridos na celula A4. Range("A4").CopyFromRecordset rsConsulta 'rs Consulta e uma variavel do tipo RecordSet Else MsgBox "Dados inseridos com sucesso na primeira linha em branco disponivel" Call Importar_Dados Gostaria de fazer com que o SubProcedimento Call Importar_Dados, insira dados da nova consulta SQL, a partir da primeira linha vazia, após o resultado anterior da consulta. Ex: Pesquisa anterior: 01 a 15/03 Nova Pesquisa: 16/03 a 31/03 - Ambos os resultados das pesquisas, terão que ficar armazenados na planilha, preciso incrementar essa rotina usando Loop ou outra estrutura de repetição que seja mais fácil de implementá-la.

[@gabsena1]

Boa tarde pessoal da Hastag Treinamentos, ótima aula como sempre! Eu só tenho uma dúvida: é possível selecionar a penúltima célula preenchida, ou talvez a antepenúltima, ou a 5ª célula preenchida antes da última linha? Seria possível por exemplo algo escrito desta forma: Range("A1").End(xlDown).Row - 5 Vocês sabem responder essa? Eu tentei e tentei mas não tive muito sucesso. Desde já agradeço. Tudo de bom!

[@HashtagTreinamentos]

Gabriel, é possível sim, pode fazer exatamente o que fez porque se a sua última for 10 e tirar 5 vai estar na quinta última linha.

[@jorgepaz8537]

Boa. Gostaria saber como pesquisar valor cadastrado.

[@sextodistritopolicial307]

Ótimo conteúdo.

[@andrecardoso8726]

Gostei, mas como saber se determinado funcionário já não foi cadastrado antes? Tem algum meio de conforme for digitando o nome, o VBA ir te sugerindo o complemento desse nome baseado nos nomes que já estão no banco de dados? Dessa forma talvez diminuísse a possibilidade de haver cadastros duplicados(upcase, lowercase, etc).

[@alexandresilva5665]

Como faço para, quando adicionar um novo produto, o textboxcod já saia com o cod. Subsequente? Exemplo: Ultimo código na tabela : 003 Inserir novo: 004 (preencher automaticamente no formulário). Grato

[@camilappa]

Muito bom! Obrigada

[@alvarosoares9063]

Bom dia professor, excelente vídeo. Estou com um problema e se possível peço auxílio. Application.CutCopyMode = False ActiveSheet.ListObjects.Add(xlSrcRange, Range("$R$1:$S$8"), , xlNo).Name = _ "Tabela8" No comando Range acima, como faço para identificar automaticamente a linha na coluna $S$8? Digo deixar esse intervalo dinâmico conforme seleção através do Ctrl + PgDn. Grato desde já.

[@froveroni]

Ótima aula, obrigado, #sextoucomVBA

[@CRISBARROSCOACH]

Olá! Gratidão, mas só funcionou para mim quando usei intervalos de dados, mas se estes estiverem configurados com uma TABELA com nome e tudo mais, não funciona, aparece o erro 424. Como deveria fazer nesse caso? Gratidão mais uma vez.

[@claudianideoclecio9795]

Excelente! Mas como eu faria para preencher nas células vazias (buracos) e depois organizar pela ordem da data?

[@HashtagTreinamentos]

Oi Claudiani, no caso das células vazias, você pode criar uma estrutura de repetição para excluir as linhas em branco, e aí você preenche a tabela normalmente nas primeiras linhas vazias e cria um código em VBA para colocar em ordem alfabética. Para criar esse código de ordem alfabética, você pode gravar uma macro, que a gente ensina nesse vídeo: kzbin.info/www/bejne/q3OWhXWufahkr7M

[@luispbetti]

Valeu!!

[@robertocavalheiro6445]

Com exemplo prático fica muito mais fácil.

[@joses.pacheco3069]

Sensacional.

[@serinha]

Range("A1") é o mesmo que [A1]?

[@brunodesouzadias3677]

estou chocado com esta aula

[@alessandrojesussilva2902]

Otimo video, parabens! alguma dica para executar esse processo com dados inseridos em uma cel de outra aba? Obrigado

[@HashtagTreinamentos]

Alessandro, pode só acrescentar sheets("nome da aba").range... e assim por diante.

[@leonardofernandes859]

Eu acho que seria mais fácil fazer filtragem antes pra eliminar as linhas em branco, principalmente para economizar espaço. Vou testar no Calc os mesmos comandos pra se funciona.

[@HashtagTreinamentos]

Fala Leonardo! Funcionaria, sim! Sem problemas, pode testar ai!

[@adilsonnunes4486]

Gostei... muito útil para mim.... Mad se no caso já ter incluso um dado e o que eu for incluir é o mesmo, tem como no VBA acusar ?

[@HashtagTreinamentos]

Fala Adilson, tem sim! Podemos gravar um vídeo sobre isso :)

[@aowsbruno]

Olá, muito obrigado por sua aula, estou conhecendo o VBA e me aprofundando cada vez mais. Eu usei esse código 02 vezes, uma para incluir novos funcionários em minha base de dados e outra para Atualizar alguns dados, exames periódicos por exemplo. Quando clico em atualizar exames (botão VBA criado), a caixa para incluir a data do primeiro exame já me aparece, o que me ocorre é que nem sempre será necessário fazer os mesmo exames, tem validades diferentes, então se eu clicar em cancelar em determinado exame que o colaborador não tenha feito, a data existe na referida Base será apagada. É possível incluir um comando onde eu clicando em CANCELAR, ele "pula" e mantém a data já existente ao invés de apagá-la ? E a data está saindo como formato Americano, por mais que eu formate a data, ele volta pro Formato Americano, pode me ajudar ? Abraço ! Muito Obrigado !

[@HashtagTreinamentos]

Fala Bruno! Como o VBA é em inglês, você precisa colocar lá a data no formato americano mesmo, que aí quando passar ro Excel vai passar pro formato Brasileiro! :)

[@aowsbruno]

@@HashtagTreinamentos valeu, muito obrigado pelas dicas ! aprendo muito com vocês. Abraço !!

[@clamarconservas7444]

muito bom!!!

[@EngWagnerSsa]

#sextoucomVBA #somostodos12%

[@bibianodossantos2411]

Como fazer esse InputBox na Macro do Google Sheets?

[@maurocapitani7481]

muito top.

[@xHermek]

Excelente aula professor, Como ficaria um botão para excluir a última linha caso tenha adicionado nome errado? E também é possível fazer algo caso cancelar o preenchimento e não salvar o dados? Pq a data sempre irá criar uma linha. Alguém poderia me ajudar?

[@HashtagTreinamentos]

Opa! Só escrever essas linhas de código: ult_linha = Range("A10000").End(xlUp).Row Rows(ult_linha & ":" & ult_linha).Delete Shift:=xlUp Vai buscar a última linha da planilha e depois excluir a linha inteira.

[@igorcunha4609]

#sextouvba #somostodos12%

[@oladriver4459]

# sextou!!! show essa aula

[@RodrigoAdriano]

outra opção é fazer um offset(0,0) pra baixo ,, ai nao precisa declarar a variavel

[@andreoak_l_l_]

Como seria esse código com offset?

[@RodrigoAdriano]

@@andreoak_l_l_ Range("A1").end(xldown). offset (1,0).Activate

[@andreoak_l_l_]

@@RodrigoAdriano e se essa seleção for tipo na coluna "O5", testei aqui e não deu certo. Range("O5").end(xldown). offset (1,0).Activate

[@RodrigoAdriano]

@@andreoak_l_l_ da certo sim .. só precisa ter algo na coluna

[@andreoak_l_l_]

@@RodrigoAdriano Descobri aqui, deu certo sim, vlw. Você desenvolve sistemas em Excel+VBA também?

[@paulojosegomes3337]

#sextouvba....excelente

[@mrnascimento3]

Tem como fazer uma lista? Imagine que tenha varias pessoas preenchendo, e uma delas preenche dados errados, na hora de plotar um gráfico por exemplo as informações ficam distorcidas.

[@HashtagTreinamentos]

Fala Marcos! Dá pra fazer, sim! Ensino algumas outras ferramentas que podem te ajudar aqui: kzbin.info/www/bejne/eXm5aJ-ElLxnb7s

[@gerryqda2]

#somostodos12%

[@marcelloxavier479]

#sextouvba - #somostodos12%

[@leopoldinno]

Tem como o formulário ignorar a primeira coluna? Pq eu teria que colocar uma numeração de controle na primeira coluna

[@HashtagTreinamentos]

Tem sim felipe!

[@leopoldinno]

Tudo bem se eu te mandar um email pra ajudar?

[@HashtagTreinamentos]

Felipe, Infelizmente não prestamos esse tipo de suporte mais específico e detalhado, somente para os alunos do nosso curso completo. Caso tenha interesse e queira ser avisado das próximas turmas, é só se inscrever aqui: bit.ly/semana-excel-youtube

[@eliezerkadoshim278]

Sextou com VBA....

[@verdadescristalinas]

Massa

[@luizmacaco6558]

Gostei,mas não tem como já aparecer a última linha sendo preenchida desta forma que vc fez de toda maneira eu vou ter conferir arrastando até a última linha.

[@HashtagTreinamentos]

Fala Luiz! Dessa forma que mostrei ele preenche automaticamente na última linha sem que você precise ir até a última linha.

[@jorgepaz8537]

Pesquisar, trazer os dados da mesma forma.

[@silvanoloubakijardim5115]

Sextou com VBA

[@reinas27]

o meu vba não permite o sinal de +.....

[@Thewall1406]

#sextoucomvba

[@silviohumberto9727]

#Sextoucomvba

[@jorgejuniorjvsj]

#SEXTOUCOMVBA

[@MarceloMedeirosmarcelomms22]

Sextou vba

[@verdadescristalinas]

#sextouvba

[@miznaumann7653]

#sextoucomvba

[@cintianara7519]

#sextouvba

[@deboralyssandra4550]

Sextou vba