Contador de Células preenchidas - Localizador de última célula preenchida VBA

Contador de Células preenchidas - Localizador de última célula preenchida VBA - 1º Método

Boa noite pessoal.

De vez em quando no nosso dia a dia de criador de planilhas em Excel e VBA, necessitamos encontrar a última linha populada, seja para replicar uma fórmula, seja para aplicar alguma tratativa com VBA.
Desta forma, hoje estou aqui pra ajudá-los a criar um contador simples de células preenchidas em VBA.

Para isso vamos abrir o nosso Excel, e popular com alguns dados.

Após isso vamos clicar em Alt + F11 para abrir o VBE (Visual Basic Editor) e aí clicar Menu >> Inserir >> Módulo.

Na parte à direita do VBE Já vai abrir um editor de texto para inserirmos os nossas instruções VBA.

Criaremos uma SUB com o nome find_last_cell

o código a seguir será inserido após a declaração da SUB e o final da SUB.

Dim contador As Long

contador = 1
   While Cells(contador, 1).Value <> ""
    contador = contador + 1
   Wend

   contador = contador - 1

   MsgBox "a última célula populada está na linha " & contador

Ficará assim:

Após seguidos estes passos, basta executar o procedimento para obter a informação desejada.

Esta função serve para contar as células desde que:

não tenha linhas vazias no meio dos registros da coluna A - no código está na parte - (contador, 1), que é a coluna usada neste exemplo.

No próximo post vou colocar outra forma de obter a última célula preenchida.

Até mais. :)

Comentários

Postagens mais visitadas deste blog

Trocando pontos por barra - Datas

Olá.. Este post vem atender algumas pessoas que no seu dia a dia precisam utilizar algumas técnicas para trocar pontos por barras em campos de relatórios excel que são importados de sistemas como SAP, Oracle ou similares. Muitas vezes temos relatórios que tem mais de 100 mil registros e o campo vem assim "10.01.2011". Temos como fazer a famosa técnica do CTRL + L, localizando estes registros e substituindo por "/". Porém pode ser que por algum motivo ou outro não dê certo, então aqui vai uma alternativa. Vamos por partes: Para capturar o dia vamos usar uma função do excel que extrai os N caracteres da esquerda de uma célula. como os caracteres referentes ao dia, são os dois primeiros da esquerda, vamos ao exemplo: Para capturar o mês, temos duas alternativas. Como o mês fica no meio da sequência de caracteres não podemos nem usar a função esquerda nem usar a função direita de maneira isolada. Podemos então utilizar as duas funções da seguinte maneira: Na primeira op...

Limpar área de transferência

No desenvolvimento de macros que geralmente precisamos limpar a área de transferência para que não apareça uma chata mensagem de que "Você deseja manter os dados da área de transferência?", penei por um bom tempo para encontrar um código que não precisasse clicar em nenhum botão para seguir com a rotina. Então encontrei este pequeno fragmento que ajudou em muito. Vamos a ele: Application.CutCopyMode = False Basta inserí-lo no seu código que não aparecerá mais a inconveniente janela para ficar clicando.

Convertendo Juro Anual em Mensal e Diário

Olá Na faculdade, no trabalho, no dia a dia, quando vamos pagar contas, ou mesmo só para conhecimento é muito importante saber o que significa um juro quando o convertemos para um período diferente do que os vemos quando anunciado em uma promoção, empréstimo, financiamento ou mesmo em uma compra a prazo em uma loja qualquer. Vamos ver abaixo como fazer esta conversão no excel. Como podemos ver existe a taxa a ser convertida, que no caso é de 216% como taxa anual. Já no exemplo abaixo, existe a conversão para uma taxa diária. Usamos a mesma taxa anual e a convertemos para dia, usando 365 dias para 1 ano. Foi apenas aplicada uma fórmula padrão para conversão de juro composto, que é (((1+i)1/n)-1) para converter para um período menor (ano para mês ou dia) e (((1+i)n/1)-1) para converter para um período maior (dia ou mês para ano ou períodos maiores). Onde i é a taxa de juros, o n é o período.

Excel Curitiba

Pesquisar este blog