ハイパーリンク

質問

Excel2003です。

ハイパーリンクで同一ページのA1からA500にリンクしたのですが、
A500に移った時に画面の下のほうでA500が選択された状態になります。

移った時にA500が画面の上になるように出来るでしょうか？

回答No.2

merlionXX · ベストアンサー

> 3行目が赤字になりました。

失礼しました。

Application.Goto Reference:=Range("A500"), Scroll:=True

に変えてください。
"A500" と書くべきところが　"A500 となっていたのが原因です。

お礼

A500が画面上にある状態で飛びました。
ありがとうございました。

回答No.1

merlionXX

ハイパーリンクでそこまでの指定はできません。
VBAになりますね。
簡単ですので、以下の手順で試してみてください。

1. 設定したいシートのシートタブを右クリックしたら、[コードの表示]を選択。
2. 出てきた所に、以下のコードを貼付けます。

'********これより下**********

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Application.Goto Reference:=Range("A500), Scroll:=True
End Sub

'********これより上**********

3.Alt+F11キーでワークシートへもどります。

これで、そのシートはA1をクリックするとA500飛び、A500画面左上にもってきます。

補足

ハイパーリンクでは無理でしたか。
上記をコピペしたところ、コンパイルエラー：構文エラーが出ました。
1行目の背景が黄色くなり、3行目が赤字になりました。