質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
85.48%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

Q&A

1回答

6003閲覧

外部のMDBのテーブルと接続するには

TATU425001

総合スコア8

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

0グッド

0クリップ

投稿2016/09/09 04:41

ご質問させて頂きます。
ACCESS2000+ADOです。

バックエンドファイル(テーブルのみ) A.MDBと
フロントエンドファイル(フォーム、レポート等) B.MDB
に分割しています。

フロントエンド(B.MDB)から
バックエンド(A.MDB)のテーブルを
フロントエンド(B.MDB)のワークテーブルに追加するために
このようなSQLを生成してみたのですが
エラーになってしまいます。

誤り箇所をご指摘頂けると嬉しいです。

*******

Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cn = CurrentProject.Connection

SQL = "INSERT INTO WRK一覧 "
SQL = SQL & "SELECT 一覧.* "
SQL = SQL & "FROM 一覧 IN [Ms Access;PWD=0000;DATABASE=C:\A.MDB;]; "
cn.Execute SQL

「FROM句の構文エラーです」

*****

外部のMDBのテーブルと接続するには
どのようにすればいいです。

なお、こちらのベージを参考にしています。
http://hatenachips.blog34.fc2.com/blog-entry-351.html

気になる質問をクリップする

クリップした質問は、後からいつでもMYページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

guest

回答1

0

現在Access環境が手元に無く試せないのですが、
参考にされたページの書き方が正しいとすると

SQL = SQL & "FROM 一覧 IN [Ms Access;PWD=0000;DATABASE=C:\A.MDB;]; "

ではなく

SQL = SQL & "FROM 一覧 IN '' [Ms Access;PWD=0000;DATABASE=C:\A.MDB;]; "

が正しいのではないでしょうか。

投稿2016/09/09 15:15

nakit

総合スコア410

バッドをするには、ログインかつ

こちらの条件を満たす必要があります。

TATU425001

2016/09/13 01:35

お返事ありがとうございます。 SQL = SQL & "FROM 一覧 IN '' [Ms Access;PWD=0000;DATABASE=C:\A.MDB;]; " に、修正してみたのですが やっぱり同じエラーになってしまいました。 こういう書き方は出来ないのでしょうか…。
nakit

2016/09/16 14:17

以下でどうでしょうか。 SQL = SQL & "FROM [Ms Access;PWD=0000;DATABASE=C:\A.MDB;].一覧;"
guest

あなたの回答

tips

太字

斜体

打ち消し線

見出し

引用テキストの挿入

コードの挿入

リンクの挿入

リストの挿入

番号リストの挿入

表の挿入

水平線の挿入

プレビュー

まだベストアンサーが選ばれていません

会員登録して回答してみよう

アカウントをお持ちの方は

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
85.48%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問