range selection

[ksnapp]

hi

here is what I tried

Sub asdf()

Rw = Cells(Rows.Count, 5).End(xlUp).Row
Range("E2", Rw).Select
MsgBox (Rw)

End Sub

what i want it do is select cells from E2 down to the last populate
cell in E. is that possible

I need this to plug into a sub that used a "for each cell in selection
routin

 

[Frank Kabel]

Hi
try
Sub asdf()
Dim rw
rw = Cells(Rows.Count, 5).End(xlUp).Row
Range("E2", Cells(rw, 5)).Select
MsgBox (rw)

End Sub

 

[ksnapp]

works great thank