AccessVBAで「dim dbs as database」がエラーになる

質問

済みませんが、非常に基本的なことを聞かせていただきたいと思います。

AccessのVBAで関数を実行すると、いきなりエラーになりました。
dim dbs as database　の文でエラーになり、「コンパイルエラー　ユーザ定義型が定義されていません」というエラーメッセージが出ました。
databaseが定義されているような感じです。

どうすれば宜しいでしょうか？

回答No.2

maruru01 · ベストアンサー

こんにちは。maruru01です。

VBEの画面のメニューの[ツール]→[参照設定]で、

「Microsoft DAO X.X Object Library」（X.Xはバージョン）

の項目にチェックが入っていますか？

ちなみに、DatabaseオブジェクトはDAOしかないのでいいですが、Recordsetオブジェクトなどは、ADOとDAOの両方にあるので、

Dim rs As DAO.Recordset

のように、どちらかを明確に記述しないといけません。
統一的で分かりやすいコーディングのためには、Databaseオブジェクトも、

Dim dbs As DAO.Database

のように記述するように心がけましょう。

お礼

ありがとうございます！
OKになりました！

回答No.1

noname#4564

メニューバーより、[ツール] - [参照設定]を開き、
「Microsoft DAO 3.6 Object Library」にチェックを入れましょう。

なお、

> dim dbs as database　

Dim dbs As DAO.Database

とライブラリ名で修飾して定義した方がベターです。

お礼

ありがとうございます！
OKになりました！