vba – Excelでドキュメントインスペクタの警告を削除する方法

microsoft-excel microsoft-excel-2016 vba

XLSMタイプの一連のファイルでVBAスクリプトを実行しています。プロセスを自動化しようとしているときに、Document Inspectorに関する警告が表示されて停止してしまいます

事前にファイルに対して実行できるスクリプト、またはコードに埋め込むことで、この警告を取り除くことができるスクリプトはありますか？

Warning Message

Document Inspector error

注意してください!文書の一部には個人情報が含まれている場合があり、文書検査官では削除できません

　 16　 Tess in Oz　 2018-04-13

ベストアンサー

注意してください!ドキュメントの一部に個人情報が含まれている可能性があります

Excel 2016やExcel 2013でドキュメントインスペクタの警告を削除するには、次の2つのことを確認します

  • 左上の「ファイル」に移動します
  • をクリックし、[オプション]、[トラストセンター]、[トラストセンターの設定]、[プライバシーオプション]を選択します
  • で、「保存時にファイルのプロパティから個人情報を削除する」というチェックボックスのチェックを外します
  • をクリックしてOKを押します

Source

Or

  • File > Info に移動します
  • で、「この情報をファイルに保存する」をクリックします

次回の保存時にはもう警告は出ないはずです

Source

18　 Pimp Juice IT　 2018-04-13

My Solution

VBでは難しそうなドキュメントインスペクタを無効にする代わりに、メッセージ自体をブロックしているだけです。ソースファイルはどうでもいいので、シームレスにデータをコピーしたいだけなので、私の場合はこれで問題なく動作します

このコードをコードの先頭に追加することで、ドキュメントインスペクタの警告が表示されなくなりました

'Disable privacy settings warning
Application.DisplayAlerts = False

2　 Tess in Oz　 2018-04-13

ドキュメントを開く > alt+f11 > Module Thisworbook を入力します

Private Sub Workbook_AfterSave(ByVal Success As Boolean)
Application.DisplayAlerts = True
End Sub

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DisplayAlerts = False
End Sub

1　 Francisco Costa　 2019-09-30

スポンサーリンク
タイトルとURLをコピーしました