VBA：Accessのリンクテーブルの接続先（リンク元）の変更方法（DAO）
１．やりたいこと
Accessのリンクテーブルの接続先・リンク元のパスを変更したい。
２．サンプルコード
サンプルコードは以下となります。
実行するとAccessのリンクテーブルの接続先・リンク元が変更されます。
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
Option Explicit Private Sub 実行3_Click() Dim dbs As DAO.Database Dim tdf As DAO.TableDef Set dbs = CurrentDb '変更したいリンクテーブルを指定' Set tdf = dbs.TableDefs("リンクテーブル_test1") 'リンクテーブルの元データとテーブルを指定' tdf.Connect = ";DATABASE=C:\Users\xxxx\元DB.accdb;TABLE=T_test1" 'リンクテーブルを更新' tdf.RefreshLink Set dbs = Nothing Set tdf = Nothing End Sub |
◆関連記事
AccessVBA：【DAO】テーブルのインデックス作成・削除（CREATE INDEX・UNIQUE INDEX・DROP INDEX）
【VBA】DAOを使ったテーブルのインデックスの作成と削除の方法について
