Are you sure? Did you forget .xls?

with Workbooks("SummaryMaster2.xls")
.Activate
.Sheets("Main").Select
end with


--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"TC" wrote in message
...
Ever since I had newer version of Excel installed I cant run macro
which was executing perfectly before an update.
Excel version: 2003 SP2
VB version: 6.3 9972

Below is the code, which always shows as a stopper €¦.

Workbooks("SummaryMaster2").Activate
Workbooks("SummaryMaster2").Sheets("Main").Select

And the error message is
€œRun-time error €˜9
Subscript out of range€�


Any help will be greatly appreciated.

TC