Home Excel - Dicas Microsoft Excel VBA Excel VBA - Linhas e Colunas Excel planilhas vba linha propriedade offset localiza proxima

Excel planilhas vba linha propriedade offset localiza proxima

E-mail Imprimir PDF

Saberexcel - o site das macros

Essa macro do Aplicativo Microsoft Excel VBA(Visual Basic Application), localiza a última linha e com auxílio da propriedade Offset(Desloc) linhas e colunas, localiza próxima célula em branco em determinada coluna e insere dados referente à escolha em uma caixa de combinação (Combobox - Ferramentas Formulário(Excel))

Prezada Patrícia,
vou usar um exemplo de propriedade offset para localização da última linha.

Nomeei o range (Dados) - P1:P14
Inserí uma caixa de combinação (Formulario) e vinculei a célula N12,
Inserí uma Função Procv na célula (E2).
Atribui uma macro a essa caixa de Combinação.
A macro localizará a próxima linha em branco na coluna C, e vai inserir o valor que está na célula E2.

Bem simples, mas poderá fazer um sistema de cadastro usando esse principio e outras centenas de aplicações.... não é ...? - use a criatividade..

Acho de extrema importância no aprendizado ms excel vba, o aluno dominar o conhecimento sobre a Propriedade Offset, que desloca (Linhas , Colunas) e insere dados, copia, deleta, enfim faz muitas tarefas importantes em programação Excel VBA(Visual Basic Application).
Futuramente vou escrever um módulo sobre essa Função e xplicar como fazer esse tipo de programação que é essencial no Aprendizado Microsoft Excel VBA.
Observe no site ... COMO FAZER - MODULO PROGRAMAÇÃO OFFSET(DESLOC), verifique a disponibilidade

Esse tipo de exercício tem que ser repetido diversas vezes até memorizar, faça quantas vezes for necessário para que possa fazer um exercício sem precisar copiar e colar, isto é, (repita várias vezes até memoriar... depois tenta fazer a macro sem olhar no exemplo.)

Sub Retorna_ultima_linha_usada()
ActiveSheet.Range("C" & ActiveSheet.Rows.Count).End(xlUp).Offset(1, 0).Activate ' Offset(Linhas,Colunas) - desloca numeros linhas e colunas
ActiveCell.Value = Range("E2").
Value
MsgBox "Item....: [ " & [E2] & " ] inserido com sucesso", vbInformation, "Saberexcel - site das macros"
End Sub

Sub localizando_ultima_celula()
Range("C65536").Offset(1, 0).End(xlUp).Select
End Sub

Espero que o exemplo possa ajudá-los , Fiquem com Deus,
Expedito Marcondes



Aprenda tudo sobre o Aplicativo Microsoft Excel VBA (Visual Basic Application), sozinho, com baixo custo,
praticando com os produtos didáticos SaberExcel



Baixe o exemplo de planilha contendo as macros acima
vba linhas propriedade offset localiza proxima cel branco (22.8 KB)

Última atualização em Seg, 01 de Outubro de 2012 18:03  

Adicionar comentário

"Jamais considere seus estudos como uma obrigação, mas como uma oportunidade invejável para aprender a conhecer a influência libertadora da beleza do reino do espírito, para seu próprio prazer pessoal e para proveito da comunidade." Albert Einstein


Código de segurança
Atualizar

Pesquisa Google SaberExcel

Publicidade Google

Publicidade

Rastreamento Correios

Digite o número do SEDEX conforme o exemplo:
Correios do Brasil

Assinatura SaberExcel

Google Associados

Depoimentos

Visitantes SaberExcel

Excel VBA Estudos®
mod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_countermod_vvisit_counter
mod_vvisit_counterHoje4870
mod_vvisit_counterOntem5059
mod_vvisit_counterEsta Semana19917
mod_vvisit_counterSemana passada30982
mod_vvisit_counterEsse mês38105
mod_vvisit_counterMês passado153723
mod_vvisit_counterTodos10460934
Aprenda MS Excel VBA

Adicione Saberexcel Favoritos

 
 

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


   Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA