Never mind I found this solution that works:

Hit ALT+F11 to open VBA.
Select: 'This Workbook' in the VBA Project's 'Miscrosoft Excel Objects' (upper left window)

In large right window put the following code:

Private Sub Workbook_Open()
Sheet1.Range("A1").Select
End Sub

This will select A1 when Workbook opens.