acess97でのイベントエラー

このQ&Aのポイント
  • acess97のフォーム画面でボタンをクリックするとイベントエラーが発生しました。
  • エラーメッセージには式の指定が間違っていることが記載されています。
  • 他のPCでは正常に動作するため、PCの環境が原因かもしれません。
回答を見る
  • ベストアンサー

acess97でのイベントエラー

イベントプロパティに提案した式エラー時でエラーが発生 しました。オートメーションエラーです。 ※マクロ名、ユーザー定義関数名、「イベントプロシージャー」  以外の式が指定されています。 ※関数、イベント、マクロの評価でエラーが発生しました。 Praivate sub cmdSansyo_Click() ctlCommonDialog.lnitDir = "c:\支部会計" ctlCommonDialog.fileName = "Zai30.mdb" ctlCommonDialog.Filter = "財務会計システム(Zai30.MDB")Zai30.mdb" ctlCommonDialog.Filterlndex = 2 ctlCommonDialog.ShowSave [保存先] = ctlCommonDialog.fileName End Sub access97のフォーム画面で、ボタンをクリックすると上記の エラーメッセージが出ます。他のPCでやるとうまくいきます。 PCの環境がおかしいのでしょうか? 教えてください

noname#72697
noname#72697

質問者が選んだベストアンサー

  • ベストアンサー
  • Gin_F
  • ベストアンサー率63% (286/453)
回答No.1

コモンダイアログが使えない環境では? 通常のプロフェッショナル版とかでは、コモンダイアログは使えないと 思います。 デベロッパー版か、VBの環境が入っていれば、大丈夫のはずですが。

関連するQ&A

  • access2000でのロジックエラー

    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

  • ファイルを開くとエラーが起こり、イベントが機能しな

    ファイルを開くとエラーが起こり、イベントが機能しないです。 オフィス2003を使っていて、mdbファイルです。 (私が作ったファイルではありません) アクセスを起動したら、画像のようなダイアログが表示されました。 ------------------------------ イベントプロパティに指定した式 クリック時 でエラーが発生しました Returnに対応するGoSubがありません。 *マクロ名、ユーザー定義関数名 {イベントプロシージャ}意外の士気が指定されています。 *関数、イベント、マクロの評価でエラーが発生しました。 このエラーは、Microsoft Office Access でイベントのロジックの場所を評価できないために イベントを実行できなかった場合に発生します。 たとえば、フォームの "OnOpen/開く時" プロパティが =[フィールド] に設定されている場合、イベントが開始されたときに Access ではマクロまたはイベントの名前が実行対象として予期されるため、このエラーが発生します。 ------------------------------ と表示されました。(1回限り) 「すべてのAccessオブジェクト」を見ると ・テーブル ・クエリ ・フォーム ・モジュール があるので、モジュールが原因だと思います。(マクロはない) フォームは一応開いたのですが、コマンドボタンやコンボボックスをクリックすると今度は違うエラーが出ました。 内容は、 ------------------------------ 「イベント プロパティに指定した式 読み込み時 でエラーが発生しました。 オブジェクトまたはクラスがこのイベントセットをサポートしていません。 *マクロ名、ユーザー定義関数名 {イベントプロシージャ}意外の士気が指定されています。 *関数、イベント、マクロの評価でエラーが発生しました。 プロパティまたはメソッドにアクセスしようとして、Visual Basic for Applications (VBA) で問題が発生しました。次のいずれかの問題である可能性があります: 参照が見つからない。 見つからない参照を復元するには、マイクロソフト サポート技術情報の記事 283806 を参照してください。 式が正しく指定されていない。 イベント プロパティで使われるすべての式が正しく指定されているかどうか確認してください。 モジュールでユーザー定義関数が sub または private 関数として宣言されている。 式でユーザー定義関数を解決できるのは、ユーザー定義関数が次のいずれかの関数として宣言されている場合のみです: モジュール内の public 関数 カレント フォームまたはレポートのコード モジュール内の public または private 関数 Access のセキュリティが "中" または "高" に設定されていて、Microsoft Jet 4.0 SP8 アップデートがインストールされていない。 セキュリティが "中" または "高" に設定されている場合、Access が正しく機能するには、最新のバージョンの Jet 4.0 がインストールされている必要があります。Windows Update で最新のバージョンの Microsoft Jet を入手してください。 ------------------------------ との事です。(添付参照) ファイルを一度閉じて開きなおしたら、最初のエラーは表示されなくなりましたが2回目のエラーは表示されます。 VBE画面を開いて、デバッグ→ファイル名のコンパイルを実行しても、何もエラーになりません。 全てのイベントを実行しようとすると(どnのコマンドボタンを押しても)同じエラーが出ます。 VBAコードにブレークポイントを設置しても、イベントが発生されないため、ブレークポイントに辿り着けません。 全てのVBAコードをコメントブロックしてもエラーになります。 どうやって治せば良いでしょうか? ご教授よろしくお願いします。

  • Access2002 イベントエラー

    Access2002、VBAを使って作成したファイル(A)(B)を共有フォルダにおき、数名に(A)をダウンロードして使ってもらっています。ファイル(A)がフロントでファイル(B)がデータ格納になっています。最近、新しいユーザを追加しました【(A)のユーザ追加画面から入力し、(B)データへの追加。】ところが、私や既存ユーザのPCからその新しいユーザでアクセスできるのに、その新しいユーザーがご自身のPCからアクセスすると下記のようなコメントがでてアクセスできません。 ===== イベントのプロパティに指定したクリック時でエラーが発生しました。 マクロ名・ユーザー定義関数名・イベントプロシージャー以外の式が指定されています。 関数・イベント・マクロの評価でエラーが発生しました。 ===== これは、彼女のPCに問題があるのでしょうか?それとも私の方で何か別に設定しなくてはならないのでしょうか?

  • ACCESSエラー「モジュールがありません」

    ACCESS2000でテーブルとフォームを作っていたら下記のエラーメッセージが出てきました。 「実行時エラー'2001';直前の操作はキャンセルされました。」 その後、 「イベントプロパティに指定した式 クリック時でエラーが発生しました:モジュールがありません。※マクロ名、ユーザー定義関数名、[イベントプロシージャ]以外の式が指定されています。※関数、イベント、マクロの評価でエラーが発生しました。」 というメッセージもでてきました。また、フォームが開かなくなり誤作動をし始めたのですが原因がわかりません。どなたか回避策をご存知ないでしょうか?

  • Access2003 VBA イベントハンドラ

    メインフォームからインスタンス化して色々な用途に使用するサブフォームがあります。 そのフォームにはボタンがついていますが、用途別にインスタンス化するときに、別々のクリックイベントをセットしたいのですが、方法が分かりません。 set subform = New subformの基 subform.button1.OnClick="=関数名" とやると、「イベント プロパティに指定した式 クリック時 でエラーが発生しました:このオブジェクトにはオートメーションオブジェクト'関数名'は含まれません」、と実行時エラーが出ます。 ひょっとして、こういう使い方はできないのでしょうか?

  • 2003アクセス → 2010移行のトラブル

    アクセス2003で作成したものがアクセス2010では全く使用できなくなりました。 どのボタンを押しても下記メッセージがでます。 ●イベントプロパティに指定した式 クリック時 エラーが発生しました。 ・修正候補 ステートメントの最後 ・マクロ名、ユーザー定義関数名、(イベントプロシージャ)以外の式が指定されています。 ・関数、イベント、マクロの評価でエラーが発生しました。 ●ヘルプを表示すると  このエラーはイベントのロジックの場所を評価できない為にイベントを実行できなかった為に発生します。例えば、フォームの OnOpen/開く時”” プロパティが=[フィールド]に設定されている場合、イベントが開始されたときに、マクロまたはイベントの名前が実行対象として予期されるため、このエラーが発生します。 コードを見ると赤くなっているのは下記だけだったのですが、他にも問題があるような気がします。。。。 Private Sub 見積書(少数点)ボタン_Click() End Sub Private Sub 報告書(少数点)ボタン_Click() End Sub ご教授宜しくお願い致します。

  • Access97のエラーについて

    Access97のシステムがあります。 元は、Access1.0の時に作成されたもので、バージョンアップを重ねて現在97で動いています。 このシステムに機能を追加していたのですが、 ボタンのクリック時のイベントでマクロの実行を行ったところ、 「VisualBasicを再コンパイルしてください」みたいなコンパイルエラーが出たので、 このマクロを全てVBAに書き換えました。が、次に実行したら、オートメーションエラーが 出て、VBAに書き換えた部分のFUNCTIONの行が反転して実行が止まってしまいました。 そこで、バックアップしてあったmdbに同じ追加を行い、実行してみたところ、 何回かはちゃんと動作してくれたのですが、突然、同じエラーが出てきました。 いろいろと調べてみたのですが、イマイチよく分かりませんでした。 そもそも、オートメーションエラーとはなんなのでしょうか? また、原因として考えられることは何があるのでしょうか? ご教授願います。

  • データベースのファイル

    アクセス2003で作成したVBAマクロが組んであるファイルをアクセス2007で開こうとすると、「イベントプロパティに指定した式クリック時でエラーが発生しました」と表示されてファイルを開くことができません。マクロ名、ユーザー定義関数名、「イベントプ ロシージャ」以外の式が指定されています。関数、イベント、マクロの評価でエラーが発生しましたと表示されます。どうすればファイルを開けるでしょうか?。

  • VBのランタイムエラーについて

    MDBファイルのバックアップの処理を毎日タスクで流すためにVBでEXEを作ったのですがエラーが発生しました。 ランタイムエラーのようですがMDBファイルの最適化の処理を追加する前は正常に動作していました。。。 エラー内容は run-time error'13' type mismatch です。 なにかランタイムをインストール必要があるのでしょうか? DBEngine.CompactDatabaseを使っているので参照設定で microsoft dao3.6 object libraryを追加してからおかしいようです。 お知恵をお貸しください>< '_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/ '_/ MDBファイル最適化 _/ '_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/ defrg = INIfile_read("PATH", "defrag") filename = "abc.mdb" TempFile = Left(filename, Len(filename) - 3) & "bak" 'バックアップ名を作成 DBEngine.CompactDatabase defrg & "\" & filename, defrg & "\" & TempFile '最適化 Kill defrg & "\" & filename filename = Left(TempFile, Len(TempFile) - 3) & "mdb" Name defrg & "\" & TempFile As defrg & "\" & filename

  • WindowsXPのアップデートを行ったらエラーが発生

    VB6.0で下記プログラムを作成したが、 WindowsXPのアップデートを行ったらエラーが発生するようになった。 ==プログラム Public Cn_Tables As ADODB.Connection Public Sub DB_Open() Set Cn_Tables = New ADODB.Connection Cn_Tables.ConnectionString = "Driver=Microsoft Access Driver (*.mdb);" & _ "DBQ=" & App.Path & "\TEST.MDB" Cn_Tables.Open End Sub ==エラー内容 「オートメーション エラーです。 指定されたプロシージャが見つかりません。 」 ※Openメソッド実施でエラー発生

専門家に質問してみよう