excelからaccessのファイルを開きたい

質問

いつもお世話になっております。excelにボタンを配置し、accessのファイルをvbaで開きたいと考えています。やりかたわかる方よろしくお願いします。

回答No.1

Wendy02 · ベストアンサー

Excelからは、ADO で処理するのがふつうなのですが、こういう方法もあります。

Private Sub CommandButton1_Click()
'要参照設定、Microsoft Access xx Object Library
Dim appAcc As Access.Application
Dim myPath As String
Set appAcc = New Access.Application
'パス名は、最後に必ず、「\」をつけてください。
myPath = "C:\My Documents\
With appAcc
'データベース名を入れてください。
　.OpenCurrentDatabase myPath & "test1.mdb", False
　.Visible = True
　 '処理
　.Quit 'Access終了
End With
Set appAcc = Nothing
End Sub

回答No.2

yama_x

見栄えは若干異なりますが、四角形のオブジェクトにハイパーリンクを貼り付けるだけではダメですか？
オブジェクトを右クリックして、「ハイパーリンク」から対象ファイルを指定すると開くだけなら可能です。