run-time error '9': subscript out of range

[TRosseter]

[h=2]just inserted the code and now I get run-time error '9': subscript out of range. any ideas?

Private Sub Workbook_Open()
Select Case ThisWorkbook.Sheets("aiiwwaxexcel0").Range("a3").Value
Case "History"
History_Order_Guide_Without_Pricing2
'macro that runs
Case "ItemBrowse"
Order_Guide_With_Pricing2
'macro that runs
Case Else
End Select

End Sub [/h]

 

[VoG]

Make sure that "aiiwwaxexcel0" is spelt correctly,

 

[TRosseter]

I just double checked the name and even tried another name same run time error

 

[Norie]

Where do you actually get the error?

 

[TRosseter]

Where do you actually get the error?

When i open excel

 

[TRosseter]

When i open excel

If I change my code to case range("a3") then it works fine but anytime i open an excel file it gets a global error message box.

 

[TRosseter]

If I use this code it works just fine only if the text is in the range else I get a global error


Private Sub Workbook_Open()
Select Case Range("a3")
Case "History"
History_Order_Guide_Without_Pricing2
'macro name
Case "ItemBrowse"
Order_Guide_With_Pricing2
'macro name
Case Else
End Select
End Sub