A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
こんにちは。
>ジャンプ、移動先を見るスペースはとても小さく、
結論から言うと、それは、Excel内では、できません。
「ワークシート分析」の、いわゆる、デバッグ・ツールは、通常は使わないというか、あまり評判が良くないようです。
表示だけの問題なら、画面のプロパティを変更すればよいのですが、文字自体が小さくて見えないという問題に対する変更は、レジストリなどで可能ではないかと思います。しかし、同様の質問は、あまり見たこともありませんし、リスクが高いような気がします。
そこで、参照先を表示する、マクロを作ってみました。
別のブックの場合は、イニシャルだけが表示するように作ってみました。
ご質問のご期待には反しますが、もし、よろしかったらお試しください。
----------------------------------------------------
'標準モジュール設定
Sub DependMsg()
Dim AC As Range
Dim Awbn As String
Dim Acr As String
Dim Adr As String
Dim shAdr As String
Dim rng As Range
shAdr = ""
msg = ""
Awbn = ActiveWorkbook.Name
Set AC = ActiveCell
Application.ScreenUpdating = False
With AC
If .HasFormula Then
MsgBox "参照元のチェックはできません。数式をご覧ください " & vbCrLf & _
.FormulaLocal, 48
Exit Sub
End If
Acr = .Parent.Name & "!" & .Address
On Error Resume Next
rng = Nothing
Set rng = .Dependents
If Not rng Is Nothing Then
shAdr = .Dependents.Address & vbCrLf
End If
On Error GoTo 0
.ShowDependents
.NavigateArrow _
TowardPrecedent:=False, _
ArrowNumber:=1, _
LinkNumber:=1
Adr = ActiveCell.Parent.Name & "!" & ActiveCell.Address
'ブックのチェック
If Awbn <> ActiveWorkbook.Name Then
'別のブックの場合は、イニシャルが着く
Adr = "[" & Left$(ActiveWorkbook.Name, 1) & "..]" & Adr 'ActiveWorkbook.Name & Ad
End If
If StrComp(Adr, Acr) = 0 Then
msg = "N/D 依存なし"
Else
msg = Adr
Application.Goto AC
ActiveSheet.ClearArrows
End If
End With
Application.ScreenUpdating = True
If shAdr <> "" Then msg = shAdr & msg
MsgBox msg
End Sub
---------------------------------------
この回答へのお礼
お礼日時:2007/11/02 22:11
ご説明ならびに、マクロを作っていただき、大変大変有り難うございました!!!
マイクロソフトが、Excelの分析ツールを、標準装備でもっと充実させてくれると嬉しいですね。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelのマクロについて 1 2023/04/17 17:22
- Excel(エクセル) Excel シート複数 金額日計表と日付 簡単にシートコピーしたら前日の残高と日付を変更させたい 1 2022/07/15 22:10
- Visual Basic(VBA) Excelのマクロコードについて教えてください。 1 2022/03/27 13:25
- Excel(エクセル) エクセルでセルの日付を和暦表示設定にしたらおかしなことに? 3 2022/05/25 11:47
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) Excel VBAどこが間違ってますか? 4 2023/07/17 10:04
- ノートパソコン EXCEL のドキュメントの回復について 2 2023/03/19 17:16
- Excel(エクセル) Excel セルに入っている日付を参照して、別シートのリストを表示させたい 1 2022/04/12 17:02
- Excel(エクセル) excelで検索した商品の画像(ネットワーク上の)を表示させたい。 3 2023/06/28 00:32
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでブックを非表示で開いて処...
-
エクセルの関数 ENTERを押...
-
エクセルを共有するとPCによっ...
-
エクセルで参照しているデータ...
-
WorkBooksをオープンさせずにシ...
-
エクセルファイルを開かずにpdf...
-
Excel(2010)のフィルターが保...
-
エクセルで開いていないbookの...
-
Excelファイルをダブルクリック...
-
Excelで複数ブックの同一セルに...
-
Excelでブックの共有を掛けると...
-
ブックのピボットを別ブックに...
-
エクセルで「ディスクがいっぱ...
-
エクセルで50行ごとに区切った...
-
エクセル2016です。「ブッ...
-
行、列の挿入がリンク先に反映...
-
VBAでブック保護非保護を判定す...
-
複数の同じフォーマットのファ...
-
外部ブック参照が#REF!になって...
-
エクセルで別ブックをバックグ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルの関数 ENTERを押...
-
VBAでブックを非表示で開いて処...
-
エクセルを共有するとPCによっ...
-
WorkBooksをオープンさせずにシ...
-
エクセルで参照しているデータ...
-
エクセルで「ディスクがいっぱ...
-
Excelでブックの共有を掛けると...
-
Excelで複数ブックの同一セルに...
-
Excel(2010)のフィルターが保...
-
エクセルで別ブックをバックグ...
-
エクセルにおける,「ブック」...
-
同じフォルダへのハイパーリン...
-
ブックのピボットを別ブックに...
-
エクセルファイルを開かずにpdf...
-
エクセル2016です。「ブッ...
-
ブックの保護ができないんです...
-
エクセルで50行ごとに区切った...
-
エクセルシートの一部を送りたい
-
フォルダ内の複数ファイルから...
-
エクセル 複数のブックを一度...
おすすめ情報