Making New Macros

[David]

I am trying to add a macro that will effectivly roll over old statistical information, from one worksheet to the next. As this will be a yearly button, I need it to be able to add this information into the next colum after each use?????

 

[Bob Phillips]

iCol =
Worksheets("Sheet2").Cells(1,Columns.Count).End(xlToLeft).Column+1
Columns(1).Copy Destination:=Worksheets("Sheet2").Columns(iCol)

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

I am trying to add a macro that will effectivly roll over old statistical

information, from one worksheet to the next. As this will be a yearly
button, I need it to be able to add this information into the next colum
after each use?????