重要なお知らせ

「教えて! goo」は2025年9月17日(水)をもちまして、サービスを終了いたします。詳細はこちら＞

電子書籍の厳選無料作品が豊富！

うーん・・・

「1004：アプリケーション定義またはオブジェクト定義のエラー」への解消方法に関して

解決済

  • 質問者：mame1216
  • 質問日時：
  • 回答数：1件

Access(M365)で、以下VBAをIPしたのですが、1004：アプリケーション定義またはオブジェクト定義のエラーです」とのエラーが発生し、処理が途中停止してしまいます。

途中切り取りのモジュールとなり大変恐縮ですが、以下の構文の中で、何かおかしな点がもしございましたら、ご指摘アドバイスを頂けませんでしょうか。

何卒、よろしくお願いいたします。

Case 1
.Range(.Cells(2,IngCol), .Cells(IngRecCnt + 1, IngCol)).FormulaR1C1 = "=IF(RC[-1]="""",""0"",CHOOSE(IF(RC[-1]=""区分1"",""1"",IF(RC[-1]=""区分2"",""2"",IF(RC[-1]=""区分3"",""3"",IF(RC[-1]=""区分4"",""4"",IF(RC[-1]=""区分5"",""5"",IF(RC[-1]=""区分6"",""6"",0)))))),(SUM(RC[-144]:RC[-139]),(SUM(RC[-143]:RC[-139]),(SUM(RC[-142]:RC[-139]),(SUM(RC[-141]:RC[-139]),(SUM(RC[-140]:RC[-139]),(SUM(RC[-139])))"

質問者からの補足コメント

  • ちなみにACCESSで実行した結果、エラーとなりました。やりたいことは、ACCESS側のテーブルからエクセルデータを吐き出し、その中の特定の列へ計算式を追加した上でデータ出力できるようにしたいです。

      補足日時：2023/07/09 15:47
    通報する
通報する

この質問への回答は締め切られました。

質問の本文を隠す

A 回答 (1件)

No.1ベストアンサー

  • 回答者： taglet
  • 回答日時：

Accessで実行したのですか？


ソースはExcelVBAのように見えますが。
    • good
    • 1
    • 件
通報する
この回答へのお礼

助かりました

通報する
お礼日時：2023/07/09 17:45

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう！

Q質問する（無料）

このQ&Aを見た人はこんなQ&Aも見ています

関連するカテゴリからQ&Aを探す

ページトップページトップ

Q質問する（無料）

このQ&Aを見た人がよく見るQ&A

デイリーランキングこのカテゴリの人気デイリーQ&Aランキング

マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング

おすすめ情報