VBAに保護を入れるとCSV書き出しができない

Question

Anonymous

VBA独学のものです。

エクセルに入力した情報をUTF-8形式でcsvファイルとして出力するVBAを作成しています。

ActiveWorkbook.SaveAs _

FileName:=Format(Date, "yyyymmdd") & "_" & Replace(Time, ":", ""), _

FileFormat:=62, _

CreateBackup:=False

で出力しようとしていますが、プロパティ > オプションで保護をかけると上記コードでエラーとなってしまいます。

エラー番号: 1004

保護(パスワード)を解除すると正常に出力されるのですが、保護の状態だとエラーとなってしまいます。

使用しているOSはWindows10、エクセルは2016です。

もし解決方法がわかる方がいましたら教えていただけますでしょうか。

何卒宜しくお願い致します。

ロックされた質問。この質問は、Microsoft サポートコミュニティから移行されました。役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント

2 件の回答

Answer 1

Anonymous

ご連絡ありがとうございます。

お勧めいただいたフォーラムでも質問してみます。

0 件のコメント

Answer 2

PEI＿SHIN さん、こんにちは。

マイクロソフトコミュニティをご利用いただき、ありがとうございます。

VBA に保護を入れるとエラー 1004 で CSV の書き出しができないのですね。

VBA が関連するような場合、一般向けのこのマイクロソフトコミュニティでは該当するカテゴリがないため、情報が集まりにくいかもしれません。

今回の内容であれば、開発者の方々が多く利用されている MSDN フォーラムの VBA のカテゴリに投稿してみると、追加や修正が必要なコードなどについてアドバイスが寄せられるかもしれません。

よければそちらを活用してみてくださいね。