Private sub workbook_open : working but all other excell documents get a global error

[TRosseter]

vb newbie here, I have a private macro saved in thisworkbook in the .xlsb file, the code works fine if data is in the document but if the cell is blank or has other data when opening up other excel documents I get run-time error '1004': method 'range" of object'_global falied . I can click on end and im in my excel document. I cant figure out how to exclude anything but "history" or "ItemBrowse"
any thoughts would be helpful. I also tried if statements and the same error but will work it the data is in the cell

(my code below)

Private Sub Workbook_Open()
Select Case Range("a3")
Case "History"
'History_Order_Guide_Without_Pricing2
'code to do something
Case "ItemBrowse"
Order_Guide_With_Pricing2
'code for something else

Case Else
End Select
End Sub

 

[RoryA]

You should specify the sheet you are referring to:

Select Case Thisworkbook.sheets("some sheet").Range("a3").Value

 

[TRosseter]

revised code im using below:

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

 

[TRosseter]

just inserted the code posted and now I get run-time error '9': subscript out of range

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