VBA エラー「複数ステップのOLE DBの操作でエラーが発生しました。」が発生した場合の対処法

• 作成日 2021.09.24
• vba
• vba

VBAで、エラー「複数ステップのOLE DBの操作でエラーが発生しました。」が発生した場合の対処法を記述してます。

目次

• 1. 環境
• 2. エラー全文
• 3. 原因
• 4. 対処法

環境

• OS windows10 64bit

エラー全文

以下のコードの「.AddNew」時に発生。
※一部省略

Set adoCn = CreateObject("ADODB.Connection")

With adoRs

    .Open "tablename", adoCn, 1, 3 'レコードセットを開く（1:キーセットカーソル  3:レコードごとの共有的ロック）
    
    .AddNew
        !name = name
        !add = add
    .Update

    .Close 'レコードセットのクローズ

End With

エラーメッセージ

実行時にエラー　-2147217887
複数ステップのOLE DBの操作でエラーが発生しました。
各OLE DBの状態の値を確認して下さい。作業は終了しませんでした。

画像

原因

自分の場合は、insertしようとしているカラムの「IDENTITY」の指定が「はい」と設定されていたため

対処法

IDENTITYの指定を「いいえ」に変更するか、insert処理を対象のカラムに行わない

• 前の記事
  

  印刷保護されているPDFを印刷する 2021.09.24

• 次の記事
  

  javascript lodashを使って配列をランダムに入れ替える 2021.09.25