Mam's WebSite
建築CGパース住宅CGパース

Mamの覚書Q&A検索

トップページMamの覚書Q&A検索Access(VBA)⇒Q&A


大項目:「 Access 」 - 中項目:「 VBA 」

「 リンクテーブルを使っていますが、リンク先を変えるには? 」

リンクテーブルを使っています。
リンク先の変更をするにはTableDefオブジェクトの「Connect」プロパティの修正をすればいいと思うのですが、
ヘルプには変更できるとあるのに実際には変更しても反映されないです。(つまり変更できません。)
どうすればいいですか?


回答

Connectプロパティの変更後、RefreshLinkを呼び出す必要があります。

ソース

Sub ChangeLink()
  Dim db As Database
 
  Set db = CurrentDb()
 
  db.TableDefs("Table1").Connect = ";DATABASE=c:\linked.mdb"
  db.TableDefs("Table1").RefreshLink
 
  'Debug.Print db.TableDefs("Table1").Connect
 
End Sub


Mam's WebSite