「クエリの更新」がどこにあるのかわからない。

質問

エクセル2003です。

ブックを開くと
「クエリの更新
このブックには、自動更新される外部データへのクエリが含まれています、、、」
という表示が出ます。

しかしシートが多すぎて上、自分が作ったファイルではないため、
どこにそのデータがあるのかわかりません。
ジャンプ→セルの選択→選択オプション
のように調べることはできますか？

よろしくお願いします。

回答No.1

_rainman · ベストアンサー

どこのセルが影響しているか調べるには、
１．ファイルのバックアップをとる。
２．シートを削除して保存して閉じる（シート数が多いときは１０シートくらい削除）
３．ファイルを開く
　２と３を繰り返しやって、メッセージが出なくなったときの前に削除したシートを特定する。
４．セルのデータをDELETEキーで削除して保存して閉じる（これも適当な範囲でDELETEする）
５．ファイルを開く
４と５を繰り返して、セルを特定する。

力技ですが、これで特定できると思います。
但し、メッセージを表示しているセルが複数ある場合は、全て特定するのは難しいと思います。

お礼

特定できました！ありがとうございます。

回答No.2

end-u

一般操作でやるなら、ハイパーリンクを使えば良いです。間接的にではありますが。
以下手順です。
1)どこかの空いているセルで[Ctrl]キー+[k]キー同時押し。
2)[ハイパーリンクの挿入]ウィンドウで左「リンク先」を「このドキュメント内」にする。
3)「ドキュメント内の場所」に　田 定義された名前 があるのでそれを展開（田クリック）する。
4)『..._からのクエリ』という名前で定義されたものがあるなら、それを選択してOK。
　（『...クエリ』というのは既定の名前なので変更されていたら判りにくいかも）

不明だった場合、念のためマクロを使う方法も提示しておきます。
1)Excelの画面から[Alt]キー+[F11]キー同時押し。VBE(Visual Basic Editor)が起動。
2)VBEの画面から[Alt]→[i]→[m]キー順押し。標準モジュール挿入。
3)標準モジュールに以下コードをコピーペーストして[F5]キーで実行。

'新規シートを追加してA1セルから下にクエリ範囲のアドレスを書き出すマクロです。
Sub test()
　　Dim out As Worksheet
　　Dim ws　As Worksheet
　　Dim q　 As QueryTable
　　Dim i　 As Long

　　With ActiveWorkbook
　　　　Set out = .Worksheets.Add
　　　　For Each ws In .Worksheets
　　　　　　For Each q In ws.QueryTables
　　　　　　　　i = i + 1
　　　　　　　　out.Cells(i, 1).Value = q.ResultRange.Address(external:=True)
　　　　　　Next
　　　　Next
　　End With

　　Set out = Nothing
End Sub

お礼

ありがとうございます。解決しました！