エクセル２００７のハイパーリンクについて

ANo.1です。 う～ん、シェイプのハイパーリンクイベントは取れないですね。 発想を変えて、選択されたセルが「項目」で始まる名前定義がされていたらスクロールして一番上に表示すると言うので代用できませんか？ これなら、ハイパーリンクでセルが選択されたと同時に一番上に表示されます。 ただ、ハイパーリンクでなく単に「項目1」等の名前定義されたセルを選択しても一番上に表示されますが……。 先ほどのコードと同じ場所に↓を入れて見てください。 Private Sub Worksheet_SelectionChange(ByVal Target As Range) 　　On Error GoTo ErrTrap 　　If Target.Name.Name Like "項目*" Then 　　　　ActiveWindow.ScrollRow = ActiveCell.Row 　　End If ErrTrap: On Error GoTo 0 End Sub