Problems with offset function in VB

Hello,

I have written the following piece of code

Please Login or Register  to view this content.

Basically I have a chart that is linked into a drop down box list select. When you change the selection in the drop down box, the axis of the chart changes. I am trying to write a macro where you select a range of chart serries you want, click a button and then this will do the drop down boxes automatically, copy each chart, and then paste into another workbook.

Problem I am having is the

Please Login or Register  to view this content.

It works the first time through the loop but then the second time it gives me a '424' error. All I'm trying to do is make current_cell1 and 2 equal the next cell down in the column, and so on until it hits 9999.

Any thoughts on why it doesn't work would be much appreciated.

Excellent, many thanks