Copying Data

D

Dan

I am trying to set up a macro to copy info from one sheet
to multiple sheet but in the next available slot. Example
Copy sheet1 data A5 to d5 and paste it to sheet 2 & 3 for
the next available A? on sheets 2 & 3
 
T

Tom Ogilvy

worksheets("A4:D5").Copy _
Destination:=worksheets("Sheet2").Cells(rows.count,1).End(xlup)(2)
worksheets("A4:D5").Copy _
Destination:=worksheets("Sheet3").Cells(rows.count,1).End(xlup)(2)
 
Top