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

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

Boa noite pessoal.

Seguindo o exemplo do último post vamos usar a mesma planilha para conseguirmos encontrar a última célula preenchida na nossa planilha. Neste caso vou frisar que utilizaremos como base a primeira coluna.

Vamos entrar no VBE (Alt+F11) e inserir um módulo.

Vamos criar uma sub com o nome find_last_cell e escrever o seguinte código nela

Dim ult_cell As Long

ult_cell = Cells(Rows.Count, 1).End(xlUp).Row

MsgBox ult_cell

Ficará assim:

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

Esta função serve para identificar o número da linha da última célula populada baseada na primeira coluna- (Rown.Count,, 1),.

Existe ainda outra forma de se obter a última célula populada.

basta usar o código abaixo:

Dim ult_cell As Long

ult_cell = ActiveSheet.UsedRange.Rows.Count

MsgBox ult_cell

Ainda existe outra forma de se obter essa informação. Colocarei mais esta opção m breve.

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