見出し画像

実行時エラー ’3011’

Access VBAでテーブルやクエリのエクスポートを実行した時、タイトルのエラーが出ました。
※例はテキストエクスポート

実行時エラー ’3011’

オブジェクト ’オブジェクト名#txt’ が見つかりませんでした。オブジェクトが存在していること、名前やパス名が正しいことを確認してください。
’オブジェクト名#txt’ がローカルオブジェクトでない場合は、ネットワークの接続を確認するか、サーバー管理者に問い合わせてください。


テキストエクスポートのコードを確認しましたが、特におかしいところはありません。

DoCmd.TransferText acExportDelim, "エクスポート定義", "エクスポートするテーブル名", "テキストファイル名" & ".txt", True

この場合、ファイル名やテーブル名などが間違っていることが多いです。

今回は、 "エクスポートするテーブル名" のフィールド名を変えたため、事前に保存していた "エクスポート定義" のフィールド名と合わず、エラーとなっていました。

エクスポート定義を修正していくので、手動でエクスポートを開きます。

画像1

エクスポートーテキストファイル エディタが開くので下図のように進めます。

画像2

テキスト エクスポートウィザードが開くので、設定をクリックし、既存のエクスポート定義を開きます

画像3

手入力でフィールド名を更新します。

画像4

フィールド名を書き換えたエクスポート定義を上書き保存します。

画像5

画像6

商品分類情報(レコード)エクスポート定義の OK をクリックし、テキスト エクスポートウィザードの キャンセル をクリックして閉じます。
※エクスポートを実行しないので キャンセル でOK

画像7


これで、エクスポート定義を上書きしたので、エラーがでることなく、コードの DoCmd.TransferText acExportDelim… を実行できました。


引用データ:経済産業省 METI POS小売販売額指標[ミクロ] 商品分類表品目例
https://www.meti.go.jp/statistics/bigdata-statistics/bigdata_pj_2019/pos_gfk_intage.html

いいなと思ったら応援しよう!

この記事が参加している募集