Excel でドキュメント検査の警告を削除する方法

Excel でドキュメント検査の警告を削除する方法

XLSM タイプの一連のファイルに対して VBA スクリプトを実行しています。プロセスを自動化しようとしているときに、ドキュメント インスペクターに関するこの警告が表示され、すべてのファイルに対して [OK] をクリックする必要があります。

この警告を削除するために、事前にファイルで実行したり、コードに埋め込んだりできるスクリプトはありますか?


警告メッセージ

ドキュメント検査エラー

注意してください。ドキュメントの一部には、ドキュメント検査では削除できない個人情報が含まれている場合があります。

答え1

注意してください。ドキュメントの一部には、ドキュメント検査では削除できない個人情報が含まれている場合があります。「警告メッセージ」が表示されます。

削除するドキュメント検査警告中エクセル2016またはエクセル20132つのことを確認できます

  • へ移動ファイル左上隅に
  • それからオプション > セキュリティ センター > セキュリティ センターの設定 > プライバシー オプション
  • それからチェックを外す保存時にファイルプロパティから個人情報を削除する"、
  • そしてヒットわかりました

ソース

または

  • へ移動ファイル > 情報
  • 「」をクリックしますこの情報をファイルに保存することを許可する「」。

次に保存するときには警告は表示されなくなります。

ソース

答え2

私の解決策

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

このコードをコードの先頭に追加することで、ドキュメント検査警告:

'Disable privacy settings warning
Application.DisplayAlerts = False

答え3

ドキュメントを開く > 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

関連情報