• 締切済み

Access97 → Access2002 実行時に出るエラーについて

お尋ねします。 Access97で作ったアプリケーションを長く使っていましたが、この度PCを入れ替える期に合わせて、Access2002に移行させようと思っています。 コンバート自体はAccess2002側で完了したのですが、実行に際して、「プロシージャの呼び出し、または引数が不正です。」というエラーがアチコチで頻発してしまいます。 問題は、アプリ2本で、そのうちの1本だけが上記の症状を見せる点です。 具体的には・・・    If CurrentUser() = "Kanrisya" then Beep Endif ・・・等の様な箇所で、アプリAではちゃんと処理が流れて行くのに、アプリBでは上述のエラーで止まってしまう事です。 MDBの最適化・修復等を繰り返しても結果は同じです。 これって一体何が原因なんでしょうか?

みんなの回答

  • Te-Sho
  • ベストアンサー率52% (247/472)
回答No.2

私がAccess97を業務で使用していたときにAccess2000にコンバートしたときも質問者様と同じ症状になりました。 実際にモジュール内を確認したら、数ヶ所に行が消えたところ、文字が消えたところなど、モジュール内のコーディングがボロボロになっていました。もちろんうまくコンバートされていたMDBも有りましたが... 結局、そのときはAccess97側のモジュールを一度テキストファイルにコピーし貼り付けることで対応しました。フォームのクラスモジュールはそのときは問題有りませんでした。 まぁ全部コーディングし直すよりはましかと思い納得させながら残業した思いがあります。

  • ganbaro
  • ベストアンサー率45% (43/94)
回答No.1

CurrentUser() は のモジュールは両方とも同じですか またモジュール名と同じになっていませんか おかしな方にあるモジュール捨て、正しい方にあるモジュールをインポートして、試してみてはいかがでしょうか

関連するQ&A

  • アクセスでのエラーについて

    アクセス2000で作成したデータベースを「データベースの変換」を行ってアクセス2003で動かしているのですが、エラーが発生して対処しかねています。 アクセス2000の段階で、ファイルへのアクセスでエラー、というメッセージが出て 修復できず、今はデータベースの変換をしてアクセス2003で操作している状態です。 まずアクセスを起動すると、 "<フォーム名>を読み込み中にエラーが発生しました。プロジェクトの読み込みを続行しますか?" と聞いてきます。「はい」を選択するとその後は何も聞いてきません。 そして、フォームを開こうとすると "プロシージャの呼び出し、または引数が不正です"、や、 "イベントプロパティに指定した式 開く時 でエラーが発生しました。プロシージャの呼び出し、または引数が違います" といったメッセージが出て、フォームを開くことができません。また、 "データベースのVisual Basic for Applicationsプロジェクトが破損しています" というメッセージも出ました。 一気に書いてしまいましたが、どなたか分かる方がいらっしゃいましたら、解決策など教えていただけないでしょうか。 よろしくお願いします。

  • Access97から2000に入れ替えて・・・

    単に・・・「If CurrentUser() = "Kanri" then」 とかをフォームのモジュールに記述してるんですが、 Ac2000でも全然問題なく動作する(mdbファイル)と、 「実行時エラー"5"」で止まるmdbファイルがあります。 MicrosoftVisualBasic の参照設定も同じに合わせてありますが、これは一体何処が悪いんでしょうか?

  • Word起動時のエラー「実行時エラー'5'」

    実家のPCのエラーのご相談です。 あと1時間ほどで帰宅するのでその前にアドバイスをいただけると、、、 ◆トラブル内容: ワードを立ち上げようとすると Microsoft Visual Basicのエラー表示がでます。 このエラーが出ないようにしたいのですが、 方法がわからず、お力添えをお願いします。 ◆エラー内容: 実行時エラー'5': プロシージャの呼び出し、または引数が不正です。 終了およびヘルプボタンのみ有効です。 ヘルプボタンを押すとヘルプの該当項目が表示されます。 ◆ヘルプの内容: プロシージャの呼び出し、または引数が不正です。(Error 5) 呼び出しの一部が完成できません。エラーの原因と対処方法を次に示します。 引数が許容値の範囲を超えている可能性があります。たとえば、Sin 関数で扱える値の範囲は決まっています。2,147,483,648 未満の値は有効ですが、2,147,483,648 ではエラーになります。 引数に指定できる値の範囲を確認します。 現在のプラットフォームで無効のプロシージャを呼び出そうとするときにも、このエラーが発生します。たとえば、Microsoft Windows または Macintosh のみで使用できるプロシージャなどがあります。 プロシージャについてのプラットフォーム固有の情報を確認します。 詳細については、目的の項目を選択して F1 キー (Windows) または Help キー (Macintosh) を押してください。                           以上コピペ終わり マクロで見たことのあるエラー表示ですが、エクセルマクロでは デバッグで凌いだり、不要なマクロはモジュールの解放等と、多少の 対処法を学んだのですが、ワードマクロはまったく未経験でヘルプの内容も 理解出来ません。 親孝行の真似事でも出来れば、と質問致しました。 御力添えをお願いします。

  • エクセルの実行時エラー

    エクセル2000でファイルを開くと、「実行時エラー'5'プロシージャの呼出し、または引数が不正です。」というのがでてきます。過去の質問でにたようなのがあったんですけど解決できなかったので新たに質問させて下さい。 こうなってしまった経緯は、まずエクセル自体が開かなくなってしまいました。開こうとするとフリーズしてしまい、強制終了するしか無くなってしまいます。 この症状は過去の質問を参考にさせていただき回避できたのですが、その後上記のようなエラーメッセージがでるようになりました。 仕事に差支えてちょっと困っています。 宜しくお願い致します。

  • 【Excel2003】実行時エラーの解消法

    Excelを立ち上げると、以下のようなエラーメッセージが表示されます。 ----------------------------------------------- Microsoft Visual Basic 実行時エラー '5': プロシージャの呼び出し、または引数が不正です。 ----------------------------------------------- 終了を押すと、普通にファイルは立ち上がるのですが、毎回エラーメッセージが立ち上がるので少々困っています。 解消方法を教えていただけませんでしょうか。

  • 漢字変換中に、実行時エラー5が出ます。

    こんにちは。続けての質問で恐縮です。VB6(SP5)でプログラミングし、 配布したPCで、漢字変換中に 「実行時エラー"5": プロシージャの呼出、又は引数が不正です。」 が、出ます。(Windows98SE/IME97) Windowsの再インストールが必要なのでしょうか ? 宜しくお願い致します。

  • VB5.0 で実行時エラーがでる

    VB5.0でDBGRIDを呼び出し、戻ってきてからメッセージボックスを表示しようとすると、「実行時エラー5 プロシージャの呼び出し、または引数が不正です」が出ます。それもEXEから実行する時だけです。 OSはXPです。 以下のプログラムで、メッセージボックスを表示しなかったら実行時エラーはでません。 F_SelKokyak.Show vbModal If Wk_Modoru = 0 Then   Set RecUri = MAINdb.OpenRecordset("Select * " & _ " From FT_Uriage " & _ " Where Uri_MiseCode = " & Wk_MiseCode & _ " And Uri_KaisKbn = " & 1 & _ " And Uri_KyakCode = " & Sel_KyakCode & _ " And Uri_UriSbt = " & 0 & _ " And Uri_UriKakKin <> 0" & _ " Order By Uri_UriNo; ") If RecUri.RecordCount = 0 Then RecUri.Close Set RecUri = Nothing If Wk_KaisKbn = 2 Then MsgBox "売掛金はありません。", vbCritical, "入力エラー" F_EigMainInp!txtKyakName2.SetFocus Exit Sub End If End If

  • Word2000実行時エラー5の対処法について

    Word2000を実行しようとすると VisualBasic 実行時エラー5 プロシージャの呼び出し、または引数が不正です とのメッセージがでます。ヘルプを読んでも理解不明。Wordを再インストールしても変わりません。以前画像を貼り付けWord内で拡大したのが原因かと思うのですが、どなたか対処法を教えてください。なお当方VisualBasicについての知識全くありませんので出来ましたら詳しくお願いいたします。

  • アクセスadpでのDLookUp関数

    アクセス2003 adpのレポートのあるコントロールのコントロールソースにDLookUp関数を使おうとしています。 =DLookUp("列名","ストアドプロシージャー名") *ストアドプロシージャーの抽出条件にパラメータを設定してあります レポートの「入力パラメータ」にも記入してあります *ストアドプロシージャーを実行した結果のレコードは1つのみです mdbでは =DLookUp("列名","クエリー名") でうまくいっていたのですが adpの場合#エラーになってしまいます 一時ファイルにレコードを追加してそれを引数にすればうまくいくのですが、 できればストアドプロシージャーを引数にしたいと思っています。 どなたかご教授をお願いいたします

  • ExcelのVBA で実行エラー5

    ExcelのVBA で実行時エラー5のプロシージャの呼び出し、または引数が不正です。 と出るのですが、何が悪いのでしょうか? 引っかかる部分は下のコードの「tf.Writeline (Wl)」のところです。 'On Error GoTo ErrorHandler tf.Writeline (Wl) On Error GoTo 0 Wl = "" C = C + 1 End If 回答よろしくお願いします。