ブックを開いた後、必ず最初に見たり、または入力をするシートがある場合は自動で選択するようにしておきましょう。

例えばコードネームが「Sheet1」(またはシート名「Sheet1」)のシートを選択したい場合はワークブックモジュール内に以下のプロシージャを記述します。

Private Sub Workbook_Open()
  Sheet1.Select
'  Sheets("Sheet1").Select      シート名を使う場合
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
  Sheet1.Select
'  Sheets("Sheet1").Select      シート名を使う場合
End Sub

この2つは、ブックを開いた後に「Sheet1」を選択するか、あらかじめ「Sheet1」を選択した状態でブックの保存しておくかの違いです。コードネームについてはこちらを参考にしてください。