extract information from a spreadsheet

[ayunik]

i need help again here...wads the code for extracting information from
sheet2 on the same file?together there are 4 sheets.
on sheet2 i need to extract the User ID fr column D8 - till the end of
the information.

do ask me again if dun understand.thanks alot.

 

[Tom Ogilvy]

Dim rng as Range
With Worksheets("Sheet2")
set rng = .Range(.Cells(8,"D"),.Cells(rows.count,"D").End(xlup))
End With
rng.copy Destination:=Worksheets("sheet3").Range("A1")

copies the User ID to Column 1 of sheet3 as an example.