エクセル小僧：参照先のセルにスクロール：崖の上のジョージ：So-netブログ

	ブログをはじめるログイン

エクセル小僧：参照先のセルにスクロール　[コンピューター] [編集]

こんなことに困っているのは、自分だけかもしれませんが。。
そのセルの参照先がうまく見つけられず。。。

参照先のセルを探す方法としては、知る限り、２つあります。

【方法１】
1. 参照元のセルを選択する
2. Ctrl + G
3. セル選択
4. 参照先を選択
5. OK

【方法２】
数式 - ワークシート分析 - 参照先のトレース

でも、たまにしか使わないので、いざってときに忘れている。。
そこで、【方法１】について、マクロ記録を行った結果、

Selection.DirectDependents.Select

Selection：選択されたセル
DirectDependents：直接の参照先（１レベルのみということカナ？）
Select：選択する

で、参照先セルを選択していることが判明。コードを追加して、
参照先セルの１番目のセルにスクロールするようにしてみました。

' 【機能】選択されているセルの参照先を選択
Sub MsSdd1()
  ' 【変数】
  Dim myRange1 As Range ' Range型
  Selection.DirectDependents.Select ' 選択されているセルの参照先を選択
  Set myRange1 = Range(Selection.Address) ' 選択した参照先セルを代入
  ' 参照先セルの１番目のセルへスクロールする
  With ActiveWindow
    .ScrollRow = myRange1.Cells(1).Row
    .ScrollColumn = myRange1.Cells(1).Column
  End With
End Sub

Bon Jovi - It's My Life

It's my life
And it's now or never
I ain't gonna live forever
I just want to live while I'm alive

俺の人生
今でしょ！
永遠に生きることなんてできやしない
生きている間は生きていたいんだ