HOW TO SELECT RANGE IN MACRO

[K]

Hi, can anybody pleae tell me that how can i select range in macro
from A1 to column D cell which come in same row of last value cell in
column A

 

[Nigel]

With Sheets(1)
.Range(.Cells(1, 1), .Cells(.Cells(.Rows.Count, "A").End(xlUp).Row,
"D")).Select
End With