Excel VBA - Selecionar Intervalo a partir de uma Célula ativa

[denisluan]

Boa tarde

 

Preciso selecionar uma intervalo de células, para isso, primeiro preciso descobrir qual a última célula preenchida da tabela a partir da célula J5, para isso usei;

 Range("J5").Select
    Selection.End(xlDown).Select

A partir daí teria que criar uma seleção de 6 colunas para esquerda e 2 para direita, com essa linha selecionada eu iria mudar algumas formatações dela (cor, bloqueio...)

 

 

Alguém pode me ajudar a conseguir essa seleção?

 

 

Obrigado

 

 

[Eder Neumann]

veja se lhe antede:

 

Range("J5").Select
    Selection.End(xlDown).Select
    ActiveCell.Offset(0, -6).Range("A1:I1").Select
    ActiveCell.Offset(0, 2).Range("A1").Activate

 

[denisluan]

Boa tarde

 

consegui da seguinte maneira;

 

Dim UltimaLinha As Integer

UltimaLinha = Range("J5").End(xlDown).Row

Range(Cells(UltimaLinha, 2), Cells(UltimaLinha, 12)).Select

Obrigado pela ajuda!!

[Eder Neumann]

opa, também funciona....