Acccess2019 VBAで自ファイルのテーブルと他Accessファイルのテーブルを結合させたSQL

Question

VBA初心者です。

Acccess2019 VBAで自ファイルのテーブルと他Accessファイルのテーブルを結合させたSQLを実行したいのですが、「FROM句の構文エラーです。」となります。

宣言後、

sql =
"SELELCT
A.フィールドA
FROM
テーブルA AS A
LEFT JOIN
テーブルB IN '" & 他ファイルフルパス & "' ';' AS B
ON
A.フィールドA = B.フィールドA"

Set db = CurrentDb()
Set rs = db.OpenRecordset(sql)

を実行しました。
ネットから拾ったコードを参考にしています。

よろしくお願いいたします。

Answer 1

他ファイルフルパスの後のセミコロン(;)を外してみてください。

それから、エイリアス(As)の位置が違うかも。

後、その参考にしたサイトのURLも質問に追記して下さい。

尚、リンクテーブルにした方がメリットが大きいと思います。

追記

リンクテーブルの場合、
ネットワーク上のAccessDBファイルに複数PCから同時に接続しても特に問題ないでしょうか？

ネットワーク性能および参照するデータ件数にもよりますけど、テーブルをローカルのテーブルに全件コピーして処理する方が概ね高速です。

また、ネットワーク上のファイルに更新を行うような場合、ピンポイントで更新する等で、極力競合を避ける工夫を行った方が良いかと。

Comments

[aaaccc]

ご回答ありがとうございます。
参考にし、まずは結合ではなく下記SELECT文の実行は確認できました。
sql =
"SELELCT
*
FROM
テーブルB AS B IN '" & 他ファイルフルパス & "'"

これをもとに結合のSQLを作成しましたが、「FROM句の構文エラーです。」となります。
sql =
"SELELCT
A.フィールドA
FROM
テーブルA AS A
LEFT JOIN
テーブルB AS B IN '" & 他ファイルフルパス & "'
ON
A.フィールドA = B.フィールドA"

参考サイト失念してしまいました。。探します。

リンクテーブルは他Accessファイル(DBファイル)が複数のAccessファイルから接続するので、すぐ切断しておきたいのと、
遅いイメージがあるため使用しないで作成してしまいました。

[hatena19]

リンクテーブルとIn句の接続は速度的に大きな差はないと思います。むしろIn句はその都度解釈されるので遅いです（といっても微妙な差ですが）。
リンクテーブルでも、常時接続されているわけではなく、開いたときに接続されますので、In句の接続と差はないと思います。使用後、すぐに閉じれば切断されます。

[aaaccc]

追記読ませていただきました。
ローカルにコピーする方法でやっていたのですが、
見返すと煩雑なので他に手法はないかと探していました。
IN句の結合は目に見えて遅かったので現状でいこうと思います。
ありがとうございました。

Answer 2

ひとつのFROM句に複数の接続先は設定できなかったと思います。

サブクエリにすれば可能だと思います。

SELELCT
A.フィールドA
FROM
テーブルA AS A
LEFT JOIN
(SELECT * FROM テーブルB IN '他ファイルフルパス') AS B
ON
A.フィールドA = B.フィールドA

コメントにも書きましたが、リンクテーブルでいいと思います。

Comments

[aaaccc]

ご回答ありがとうございます。
環境がなく試せないので後日確認させていただきます。

リンクテーブルの場合、
ネットワーク上のAccessDBファイルに複数PCから同時に接続しても特に問題ないでしょうか？

[hatena19]

同時絶属数が多いと不安定になりますが、AccessDBファイルは、リンクテーフルで接続しても、In句で接続しても、ファイル共有を利用した接続ですので同じことです。

[aaaccc]

サブクエリにしたところSQL通りました。ありがとうございました。

動作は遅そうですが、手法として学べてよかったです。