- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：アクセスＶＢＡでのファイル操作）
アクセスVBAでのファイル操作 - プログラム修正の依頼について
このQ&Aのポイント
- 他人の作成したプログラムの修正を依頼され困っています。アクセスVBAを使用してエクセルファイルを作成するプログラムなのですが、同じ名前のファイルがあると誤動作するみたいなので、ファイルの有無を検知して先にファイルがある場合は削除を行いたいです。
- 質問者は、アクセスVBAを使用してエクセルファイルを生成するプログラムの修正を頼まれて困っています。同じ名前のファイルが存在する場合には、ファイルを削除する処理を追加したいと考えています。
- アクセスVBAでエクセルファイルを作成するプログラムの修正を頼まれています。同じ名前のファイルがあると誤動作が発生するため、事前にファイルの有無を検知し、ファイルが存在する場合は削除する処理を追加したいです。
- akd48
- お礼率100% (2/2)
- Visual Basic
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
>（”C:\Documents and Settings\（任意)・・・・・ environ("UserProfile") や environ("HomeDrive") environ("HomePath") で途中までは得られると思います。 環境変数はOS毎に増えていってますので、WindowsXPなら マイ コンピュータを右クリックして、詳細設定タブの中の環境変数か コマンドプロンプトの Set で確認できます。 ファイルの有無は、Dir 関数で確認できます。 Killステートメントはゴミ箱に移動せずに消えてしまいますが 下記リンク先ではAPIを使用してゴミ箱への移動が紹介されています。 http://vbatech.seesaa.net/article/128511536.html
その他の回答 (1)
- FEX2053
- ベストアンサー率37% (7991/21371)
回答No.1
素直に xlsObj.DisplayAlerts = False を消して、ダイアログを出せばいいだけのような気がする・・・。 http://www.happy2-island.com/excelsmile/smile03/capter00304.shtml だって既存ファイルは「消しちゃだめ」なことだってあるでしょ？
質問者
お礼
素早い御回答ありがとうございます。 ダイアログを出す方法も一理あるのですが、一連の動作を ボタンひとつで行いたいのです。 また、既存ファイルは「全て消してしまっても良い」という使用者からいわれてます。（すみません文章の中に入れてなくて・・・） ですので、もしあるなら別方法を教えていただければ助かります。 御回答ありがとうございました
お礼
ありがとうございました。早速利用させていただきます。