Dúvida Range Célula...
 
Notifications
Clear all

Dúvida Range Célula não preenchida

6 Posts
3 Usuários
0 Reactions
1,308 Visualizações
(@c_nicoleti)
Posts: 0
New Member
Topic starter
 

Bom dia senhores,

Percebi que quando estou gravando uma macro, é muito usado o comando CTRL+seta pra baixo ou END+seta para baixo, para que eu localize a ultima célula que detenha informação. Pois geralmente eu aumento uma coluna para trabalhar as informações que já tenho.

Quando esta vendo as linhas de código geradas pela gravação da macro, e vejo que aparace o comando "Selection.End(xlDown).Select" e quando eu clico na celula da coluna a direita no VBA ele define uma Range com o numero na celula que cliquei.
Caso eu execute a macro em uma planilha com numero de linhas diferentes, o comando x1Down vai ser executado corretamente, porem quando ele definiu uma range na gravação da macro, ele nao vai selecionar a celula imediatamente a direta, ele vai selecionar a célula que foi definida a range na gravação da macro, correto?

Se sim, como posso resolver isso?

Desde já obrigado.

 
Postado : 13/10/2016 8:24 am
(@mprudencio)
Posts: 0
New Member
 

Se eu entendi vc quer selecionar a primeira linha vazia da sua planilha se é isso use esse código

Range("A1048576").End(xlup).Offset(1,0).select

Substitua pelo selection......

 
Postado : 13/10/2016 2:09 pm
(@c_nicoleti)
Posts: 0
New Member
Topic starter
 

MPrudencio

Na verdade quero selecionar a celula a direita (ou a esquerda em alguns casos) da primeira linha vazia. O que seria a função do "Offset(1,0).select"?

Obrigado!

 
Postado : 14/10/2016 7:20 am
(@tiagogn)
Posts: 0
New Member
 

Bom dia.

"O que seria a função do "Offset(1,0).select"?"

Esta função faz com que selecione a célula que fica 1 linha para baixo e na mesma coluna.

(L,C)

L = Linha e C = Coluna

Caso queira subir uma linha -1... Caso queira andar para frente, 1 coluna, utilize o 1... Caso queira voltar 1 coluna utilize o -1.

 
Postado : 14/10/2016 8:06 am
(@c_nicoleti)
Posts: 0
New Member
Topic starter
 

tiagogn

Muito obrigado, Vou testar e retorno!

 
Postado : 14/10/2016 11:22 am
(@tiagogn)
Posts: 0
New Member
 

Conseguiu?

 
Postado : 06/12/2016 9:03 am