- ベストアンサー
Accessのバージョンの違いでうまく動かなくなるんですか？
Nacの回答
- Nac
- ベストアンサー率63% (7/11)
ACCESS2000からはADO(ActiveX Data Object)が既定になっています。 ACCESS97までのDAO(Data Access Object)の記述のコードを使用する には参照設定でMicrosoft DAO 3.6 Object Libraryにチェックすれば ＯＫです。 ただ、この時にDAOとADOが同時にチェックされている場合は優先順位が 高い方を優先的に参照するのでADOが上位の時はDAOであると明示する必要があります。 (例) Dim rs As DAO.Recordset DAOが上位ならば明示しなくても使用できます。 もし、ADOを使用しないのであれば参照設定でMicrosoft ActiveX Data Object～ のチェックを外しておけばよいと思います。
関連するQ&A
- エクセルからアクセスへ
お世話になります。 エクセルからＶＢＡでアクセスのテーブルに レコードを追加させたいのですが、 下記の記述でいきなり mydb as database の所が 青く塗られ 「コンパイルエラー：ユーザー定義型は定義されていません」 とエラーになってしまします。 また、databaseのdが小文字なのも気になります。 参照設定での項目チェックが必要なんだと思うのですが どこにチェックしたら良いのか、またそれだけではダメなのか 分かりません。 どなたかご教授下さい。 記 Dim mydb As database Dim myrs As Recordset Dim myrnge As Range Dim myrow As Long
- ベストアンサー
- Visual Basic
- ACCESSのVBAについて
アクセスのVBAでdatebaseやRecordsetが宣言できません。ヘルプでは【参照設定】でDate Access Objectをオンに指定ない場合は認識されずエラーになります と書いており、参照設定を見たのですがDate Access Objectという欄がありません、どうしたら宣言することができますか？ 例)Dim db As Database Dim rsDate As Recordsetこれらがエラーになる。 大変困っています。ちなみにAccess2000です。
- ベストアンサー
- Visual Basic
- ACCESSの宣言
Private Sub コード_AfterUpdate() Dim Mdb As Database Dim Mtb As Recordset Dim sqlstr As String って、始めに宣言しますが、いざプログラムを走らせてみると、Dim Mdb As Database で "コンパイルエラー ユーザー定義型は定義されていません" になってしまいます。ここでひっかかるともうどうにもできないです。 なぜ、この宣言はいけないのでしょうか？
- ベストアンサー
- Visual Basic
- Access2000のVBAでコンパイルエラー
Access2000のVBAで初歩的な質問があります。 「tblShi」というテーブルがあります。 フォームにボタン「btn1」を作り、 デザインビューでボタンのプロパティを開いて イベントのクリック時のところで、 「ビルダの選択」をコードビルダにしました。 そして「Private Sub btn1_Click()」の中に、最初に Dim db As Database という記述をしています。 このフォームを開いてボタンを押すと、なぜか コンパイルエラー ユーザ定義型は定義されていません というエラーが表示されてしまいます。 たしかにコードを書いているときに、 Dim db As のところまで入れると、小さいウィンドウの中に たくさん候補が表されますが、 その中に「Database」というのがないです。 「QueryDef」とか「Workspace」とかもありませんでした。 （「Recordset」はありまして、それはコンパイルが通ります） いろいろな解説を見ても、やはり最初はどれも 「Database」型を宣言しているようなんですが… 何がよくないのでしょうか。 もしわかる方がいらっしゃったら教えてください。
- ベストアンサー
- その他(データベース)
- Access2002 VB がエラー
Access2002 VBで以下のコーディングをしてます Dim db As Database Dim rs As Recordset Dim fld As Field Set db = CurrentDb Set rs = db.OpenRecordset("ConvertChar") これを実行するとdb宣言行で以下のエラーが表示されます。 コンパイルエラー： ユーザ定義型は定義されていません。 これは何が原因でエラーとなるのでしょうか？ 宜しくお願いします。
- ベストアンサー
- Visual Basic
- Access97でのエラー
フォームを開くときに次のVBAを実行します。 Private Sub Form_Open(Cancel As Integer) Dim db As DAO.DATABASE Dim rs As DAO.Recordset Set db = CurrentDb ところが、Set db = CurrentDb の行で次のエラーが出ます。 実行時エラー '429' ActiveXコンポーネントはオブジェクトを作成できません。 ちなみに、これを作成したのは他のパソコンで、そのパソコンでは問題なく実行します。 Windows2000のパソコンにコピーして実行しようとするとダメです。 どなたかおわかりの方、いらっしゃいましたら、教えていただけないでしょうか？
- ベストアンサー
- オフィス系ソフト
- アクセス９７のＶＢＡが２０００で使えません。
ＡＣＣＥＳＳ９７で問題なく動いていたＶＢＡなのですが、ＡＣＣＥＳＳ２０００では「ユーザー定義型は定義されていません。」というエラーとなって動きません。 ソースで言うと、 Dim DB As Database というような変数宣言の部分でいきなり出てきます。 Database型がユーザー定義型と認識されているようですが、何故こうなってしまうのでしょう？ またどのようにすればこの問題を解消できるでしょうか？ また９７と２０００でのコーディング上の変更点などは、どこで調べるのが分り易いでしょうか？
- ベストアンサー
- オフィス系ソフト
- Access2002 わからないことだらけ。
うまくいってたのにエラーになりだしました。 あせってしまって解決方法がわかりません。 基礎の基礎で簡単なことだと思いますがお笑いにならず教えてください。 Dim ds As Databases Dim rs As Recordset Set ds = CurrentDb Set rs = ds.OpenRecordset("テーブル") コンパイルエラー メソッドまたはデータメンバが見つかりません と、メッセージが出ます。 デバッグすると、ds.OpenRecordset でスットップします。 意味を教えてください。 もう一つ別の質問ですが，ＶＢＡのメニューの［ツール］→［参照設定］→［参照可能なライブラリー］はどれどれ選べばいいのですか？ また優先順位はどうすればいいのですか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- AccessVBAで「dim dbs as database」がエラーになる
済みませんが、非常に基本的なことを聞かせていただきたいと思います。 AccessのVBAで関数を実行すると、いきなりエラーになりました。 dim dbs as database の文でエラーになり、「コンパイルエラー ユーザ定義型が定義されていません」というエラーメッセージが出ました。 databaseが定義されているような感じです。 どうすれば宜しいでしょうか？
- ベストアンサー
- オフィス系ソフト
- Accessのリンクテーブル
すみません、教えてください。 Accessで複数端末から一つのMDBにデータ登録をさせる為に、VBAでツールを作っています。以下のように記述をして いるのですが、MDBを閉じるたびに、リンク先のDBを認識しなくなってしまいます。テーブルでリンクを貼りなおすとまた動くようになるのですが、どうしたらリンクを貼りなおせずにできるようになるのか、どなたか教えてください。どうかお願いいたします。 Dim LinkDB as Database Dim RST AS Recordset Set LinkDB = WorkSpaces(0).OpenDatabase("リンク先のDBの名前") Set RST = LinkDB.OpenRecordset("テーブル名",DbOpenTable)
- ベストアンサー
- オフィス系ソフト
お礼
ご回答ありがとうございました。 おかげさまで、何とか動くようになりました。