![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_08.png?e8efa67)
Access97で作成していて、access2000にバージョンアップして動かしたところ下記のエラーがでました。どこを修正すればよいか教えてください。
イベントプロパティに指定した式エラー時でエラーが発生しました。オブジェクトまたはクラスがこのイベントセットをサポートしていません。
*マクロ名、ユーザー定義関数名、[イベントプロシージャ]
以外の式が指定されています。
*関数、イベント、マクロの評価でエラーが発生しました。
Private Sub cmdSansyo_Click()
ctlCommonDialog.InitDir = "c:\My Documents"
ctlCommonDialog.fileName = "Zai30.MDB"
ctlCommonDialog.Filter = "財務会計システム(Zai30.MDB)|Zai30.mdb"
ctlCommonDialog.FilterIndex = 2
ctlCommonDialog.ShowSave
[保存元] = ctlCommonDialog.fileName
End Sub
No.1ベストアンサー
- 回答日時:
間違ってたらすいません。
フォームでもモジュールでもいいのでソースを表示し、「ツール」→「参照設定」を確認してみてください。
多分、「Microsoft ActiveX Data Object XX Library」の項目にチェック
が掛かっていると思います。
この項目のチェックを外し、代わりに「Microsoft DAOXXX Object Library」の項目を探しチェックを掛けて見てください。
多分これで動くと思います。
Access97まではDAOが標準でしたがAccess2000からはADOが標準になっています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/11 13:29
- Excel(エクセル) 【マクロ】エラーが発生⇒実行時エラー58既に同名のファイルが存在 5 2022/08/31 10:03
- Visual Basic(VBA) パーソナルXLSBのfuctionを呼び出すと「Functionが定義されていません」のエラーになる 2 2022/08/22 22:51
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2023/03/08 09:08
- Visual Basic(VBA) ワイルドカード「*」を使うとうまくいかないマクロの添削をお願いします 3 2022/03/26 09:39
- Access(アクセス) アクセス テーブルの空白を変数に置換するボタンが作りたい 4 2022/07/08 11:19
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- Visual Basic(VBA) 【VBA】Excelの特定範囲のセルを画像で保存したい 2 2023/01/25 13:06
- Visual Basic(VBA) エクセルVBA 3 2022/06/23 20:00
- Access(アクセス) エクセルのマクロについて教えてください。 2 2023/02/03 16:07
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
VBAがブレークモードになっ...
-
マクロについて教えてください...
-
なぜこんな初歩的なVBAのIf文で...
-
Excel VBA で End Subのところ...
-
VBAのエラー発生場所をメッセー...
-
EXCEL/VBAで、自分のPCだけエラ...
-
VBS実行時エラー オブジェクト...
-
ExcelVBA Range クラスの Page...
-
実行時エラー -'-2147417848
-
日本語環境下で作成したマクロ...
-
プロシージャ名の取得
-
VBSで変数の宣言はできないので...
-
ASP.NET OleDbConnectionが定義...
-
なぜエラーになるのでしょうか...
-
ExcelVBA ファイルクローズ時...
-
デバッグ時はOK、デバッグ無し...
-
VBで構造体を使うさ際の64k...
-
VB2010 CreateMailslot失敗
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
実行時エラー 438になった時の...
-
エクセルエラー13型が一致しま...
-
VBAがブレークモードになっ...
-
なぜこんな初歩的なVBAのIf文で...
-
マクロについて教えてください...
-
実行時エラー3001「引数が間違...
-
VBSで変数の宣言はできないので...
-
【Excel VBA】マクロをボタンに...
-
ExcelVBA Range クラスの Page...
-
VBS実行時エラー オブジェクト...
-
プロシージャ名の取得
-
実行時エラー -'-2147417848
-
EXCEL VBAマクロ中断でデバッグ...
-
VB6+SQL サーバー 2000 で 実行...
-
VBAでのエラー
-
ADODB.Streamを使用してUTF-8を...
-
なぜエラーになるのでしょうか...
-
Outlook.ApplicationをCreateOb...
-
VBAのエラー発生場所をメッセー...
-
AccessVBAでExcelを起動し、罫...
おすすめ情報