View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
merjet merjet is offline
external usenet poster
 
Posts: 812
Default Macro to copy multiple selctions to different pages

You didn't say what row of BU. Try this, supplying the intended rows.

Sheets("Sheet1").Rows("r1:r2").Copy _
Destination:= Sheets("Sheet" & 1 + Sheets("Sheet1").Cells(r3,
"BU")).Rows("13")

Hth,
Merjet