実行時エラー ’3011’
Access VBAでテーブルやクエリのエクスポートを実行した時、タイトルのエラーが出ました。
※例はテキストエクスポート
実行時エラー ’3011’
オブジェクト ’オブジェクト名#txt’ が見つかりませんでした。オブジェクトが存在していること、名前やパス名が正しいことを確認してください。
’オブジェクト名#txt’ がローカルオブジェクトでない場合は、ネットワークの接続を確認するか、サーバー管理者に問い合わせてください。
テキストエクスポートのコードを確認しましたが、特におかしいところはありません。
DoCmd.TransferText acExportDelim, "エクスポート定義", "エクスポートするテーブル名", "テキストファイル名" & ".txt", True
この場合、ファイル名やテーブル名などが間違っていることが多いです。
今回は、 "エクスポートするテーブル名" のフィールド名を変えたため、事前に保存していた "エクスポート定義" のフィールド名と合わず、エラーとなっていました。
エクスポート定義を修正していくので、手動でエクスポートを開きます。
エクスポートーテキストファイル エディタが開くので下図のように進めます。
テキスト エクスポートウィザードが開くので、設定をクリックし、既存のエクスポート定義を開きます
手入力でフィールド名を更新します。
フィールド名を書き換えたエクスポート定義を上書き保存します。
商品分類情報(レコード)エクスポート定義の OK をクリックし、テキスト エクスポートウィザードの キャンセル をクリックして閉じます。
※エクスポートを実行しないので キャンセル でOK
これで、エクスポート定義を上書きしたので、エラーがでることなく、コードの DoCmd.TransferText acExportDelim… を実行できました。
引用データ:経済産業省 METI POS小売販売額指標[ミクロ] 商品分類表品目例
https://www.meti.go.jp/statistics/bigdata-statistics/bigdata_pj_2019/pos_gfk_intage.html