vba macro que ao selecionar um intervalo específico

[Paulo Roberto S. da Silva]

Olá boa tarde a todos,

 

Estou com um pequeno probleminha a resolver, numa planilha eu tenho varias colunas preenchidas por contento informações sobre uma determinada chave, coloquei uma macro que ao selecionar uma célula qualquer e clicar no botão programado, a macro ira selecionar um intervalo especifico a partir da célula selecionada, e colori todo o intervalo, segue a baixo o codigo:

Sub DIF_PAGA()
Intersect(Selection.EntireRow, Range("D:R")).Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 5296274
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
End Sub

 

"" preciso saber como faço para depois da macro rodar selecionar apenas uma determinada celula, por exemplo a ultima célula do intervalo.

Agradeço a ajuda, to no aguardo.

[DJunqueira]

Q tal C1?

 

Range("C1").Select

[Black_Bird]

Boa noite a todos.

Nesse caso basta adicionar a seguinte linha ao final do seu código: ActiveCell.SpecialCells(xlLastCell).Select

Sub DIF_PAGA()
Intersect(Selection.EntireRow, Range("D:R")).Select
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = 5296274
        .TintAndShade = 0
        .PatternTintAndShade = 0
        ActiveCell.SpecialCells(xlLastCell).Select
    End With
End Sub