編集：この質問への回答は、受け入れられた回答のコメント内にあります。
Excel ファイル内のボタンをクリックして Access データベースを開こうとしています。私は現在、このコードを持っています:
Private Sub bttnToAccess_Click()
Dim db As Access.Application
Set db = New Access.Application
db.Application.Visible = True
db.OpenCurrentDatabase "C:\Users\wcarrico\Desktop\wcarrico-CapstoneFinalSubmission.accdb"
End Sub
これは一時的に機能するように見えますが、Access はすぐにシャットダウンします。問題があれば、Access ファイルには、開いたときにいくつかのテスト自体を実行する AutoExec マクロがあります。
Access アプリケーションを開こうとしないでください。データ アクセス テクノロジの 1 つを使用して接続オブジェクトを作成するだけです: - OLE-DB または - ODBC。
Google の「ODBC 接続文字列」または「OLE-DB 接続文字列」で、特定の構成 (および Access ファイルの種類) に応じて詳細を取得します。
おそらく ADODB は、データ アクセスに使用する最も簡単な現在のライブラリです。
更新: Access からデータをインポートしてから、[データ] -> [Access から]ウィザードを使用してみてください。Yu はいつでもマクロ再コーディング機能を使用して、インフラストラクチャを作成する VBA コードを自動的に生成できます。VBA オブジェクト モデルの新しい部分を調べるときは、これを定期的に使用します。
更新 - 以下のコメントからの、問題の最終的な解決策は
、変数が範囲外になるためである可能性があります。db関数の外側の宣言をモジュールレベルに移動します
New宣言を削除すると機能します