SQL内にあるデータテーブル名を見つけたい(できれば書き出しも)

前提

SQL初心者です。この度、他の人が作成したExcelファイルを大量に引き継ぐになり、四苦八苦しています。

###やりたいこと
Excelファイル内に、Ms-Queyを利用した外部接続データが入ってます。
このファイル内にあるデータが
・アクセスしているサーバー(サービス名）
・サーバ内のデータテーブル名
・抽出条件

をどこかに書き出したいです。
探すコツ、もしくは書き出し可能な方法を知りたく、アドバイスお願いします。

発生している問題・エラーメッセージ

SQLがとても複雑で、見てもテーブル名がわからずにいます。
どうすれは、テーブル名を見つけ出せるでしょうか・・・？

恥ずかしながら「from のすぐ後ろにあるのがテーブル名」
くらいしか知識がなく、副問い合わせやユニオンなるものが設定されているSQLは、ほとんど読めずにおり、困っています。

可能ならば、抽出条件も書き出したいのですが、とてもそこまで至れる気配がありません。

試したこと

VBAを使って、サーバ名・SQL全文の書き出しには成功しました。
以下抜粋です

VBA
1     Dim wstSource As Excel.Worksheet      
2     Dim wbkDestination As Excel.Workbook
3     Dim wstDestination As Excel.Worksheet      
4     Dim lst As Excel.ListObject
5     Dim qt As Excel.QueryTable      
6     Dim lngRow As Long
7     
8Set wbkSource = ActiveWorkbook
9     Set wstDestination = wbkDestination.Worksheets(1)
10      
11     lngRow = 1
12         For Each wstSource In wbkSource.Worksheets
13             For Each qt In wstSource.QueryTables
14                  For Each lst In wstSource.ListObjects
15                 Set qt = lst.QueryTable
16                 lngRow = lngRow + 1
17                 .Cells(lngRow, 1).Value = wstSource.Name　’Excelシート名
18                 .Cells(lngRow, 2).Value = qt.Connection　　’サーバー
19                 .Cells(lngRow, 3).Value = qt.CommandText　　’定義_SQL
20                 Set qt = Nothing
21             Next

この結果を基に、使用ーブル名を探してみましたが、上記の通り
テーブル名をすべてを探し出すことができませんでした。

補足情報（FW/ツールのバージョンなど）

Excel2013
Microsoft ODBC for Oracle

行動規範の内容に同意します

回答1件

ベストアンサー

地道な作業しか思いつけません。
コーディングにルールがありそうなら、それを糸口にというのもありそうですけど、完全とは言えないので、見落としは怖いですね。

VBAやSQLのコマンドなどのキーワードで探すのが確実だと思います。

・アクセスしているサーバー(サービス名）

.connectやopenなどのキーワードで探す。

・サーバ内のデータテーブル名

「from のすぐ後ろにあるのがテーブル名」は合っていますが、発想を変えて、
接続対象の全テーブルの名称で検索して、該当しているかどうかを探す。

・抽出条件

where をキーワードで探す。結合条件もwhereで記述されたりするので考慮が必要。
結合条件も含めるなら on キーワードで探す。

投稿2019/12/25 08:13

sazi

総合スコア25193

Akiko_san

2019/12/25 23:46

saziさん、ありがとうございます。まさに見落としが発覚して、震えてこちらに投稿するに至りました。。＞・サーバ内のデータテーブル名＞接続対象の全テーブルの名称で検索して、該当しているかどうかを探すありがとうございます。それぞれのサーバー(サービス名)は特定できたのですが、全テーブルが200近くあるサーバ（サーバ名）もあり、saziさんのアンサーを読んで以降、ちょっと考えてみました。自分で別途sqlを組んで全テーブルをどこかに書き出し→ExcelでVLOOKUP関数で突合せならできそうな気がします。出社しだい、全テーブルが出せるか試してみます！まずはテーブル名の特定作業を優先させて、抽出条件の書き出しは外部から要請があったらの対応にしようと思います。