エクセルシートのウィンドウ枠の固定について

質問

■エクセルのファイルに次のマクロを設定し、ファイルを開くたびに「目次」のシートが表示されるようにします。

Private Sub Workbook_Open()
Sheets("目次").Activate
End Sub

■この目次のシートに目次を作成し、それぞれの目的のシートにハイパーリンクでジャンプするようにします。

「目次」のシートのそれぞれのセルに、目的のシートのセルA1をハイパーリンクする。

■目的のシートでウィンドウ枠の固定を行う（6行目）

---------------

このような設定下で、このファイルを新たに開くと、必ず「目次」のシートが表示され、目次の中から目的のシートを表示したセルのハイパーリンクをクリックすると、目的のシートにジャンプします。

ところが、ウィンドウ枠（6行目）が固定してあり、普通前回閉じた行から表示されるはずですが、

たとえば、

事例（A）

1
2
3
4
5
---
100
101
102

ですが、実際に新たにファイルを開いて、目次からジャンプすると、

事例（B）

1
2
3
4
5
----
6
7
8
9

となって枠の設定のない状態と同じ状態で表示されます。

これを、前回閉じた事例（A）の状態で再表示されるようにしたいのですが、何が悪くて枠の固定が当初の状態に戻るのかわかりません。

何かの設定が不適切なのだと思います。

教えてください。

回答No.1

imogasi

セルに対し、挿入ーハイパーリンクで、_社員1.xls#Sheet2!A10
とした場合、社員1ブックのSheet2のA10セルをセレクトするところまでできました。
そこで、目次シートのFollowHyperlink　イベントに
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
ActiveSheet.Range("A7").Select
ActiveWindow.FreezePanes = True
End Sub
を入れてみました。
うまく行くようなんですが、やってみてください。
VBAも良く慣れてご存知の方のようですので、質問正面からの回答ではないのですが、よろしく
ーー
シートの色々な状態が、ブックを閉じた時の状態で保存される、開くと、その元の状態で画面に出ると思っていましたが。
質問は前置きが長く、読者に質問者の趣旨が読みづらい。
「ウインドウ枠の固定が、保存されない」という標題の下、
ハイパーリンクとの関連があるか（ないと思うが）を質問してはどうでしょう。
手動で開くと、ウインドウ枠の固定は、閉じたときの固定の状態が残っていますか。