Hello,

I have a script I have been running which has suddenly run into a
"Runtime error '9' - subscript out of range" error.

The original code had this:
Selection.Copy
ActiveWindow.ActivateNext
Sheets("Spending").Select

And I changed it a while ago to this:
Selection.Copy
Windows("finances_2009.xlsx").Activate
Sheets("Spending").Select

And eventually to this:
Selection.Copy
Windows("finances_" + Right(Str(Year(Date)), 4) + ".xlsx").Activate
Sheets("Spending").Select

Only the top version now works. And the later 2 do not giving me the
subscript error. Any ideas how I can fix this?

Thanks,
Ben