[Resolvido] Selecionar da celula ativa ate a ultima celula da coluna

Boa tarde!!!

O titulo diz tudo!

Como fazer para selecionar da celula ativa ate a ulttima celula com dados.

Tenho um intevalo A1:A50 seleciono manualmente A30

Quero selecionar por vba A30:A50

Minhas tentativas foram


W.Range(W.Cells(Target.Row, 1), W.Cells(UltimaLinha, 1)).Select

W.Range(W.Cells(Target.Cells, 1), W.Cells(UltimaLinha, 1)).Select

Porem da erro objeto obrigatorio.