1

自動実行マクロを実行していますが、パスワードで保護されています。すべてのパスワードを削除すると、ファイルを別の形式で保存できます。

問題は、MSExcelが「リンクを自動的に更新する」というポップアップメッセージを表示することです。MS Excelオプションのすべての設定を無効にしようとしましたが、ダイアログが引き続き表示されます。

それで、私はそのポップアップを避けるためにいくつかのコードを追加することを考えていました。

これが私のコードです:

Sub Auto_Open()
    Workbooks.Open "C:\Test\WorkbookTest.xlsx"
    ActiveWorkbook.UnprotectSharing ("galleta")
    ActiveSheet.Unprotect ("galleta")
    ChDir "C:\Users\user\Desktop\Reportes"
    Sheets("BES").Select
    ActiveSheet.Unprotect ("galleta")
    Sheets("BE800").Select
    ActiveSheet.Unprotect ("galleta")
    Sheets("BECM").Select
    ActiveSheet.Unprotect ("galleta")   
    ActiveWorkbook.SaveAs Filename:= _
        "C:\Users\user\Desktop\Reportes\test.mht", FileFormat:= _
        xlWebArchive, CreateBackup:=False
End Sub

誰かに役立つかもしれないので、パスワードの事コードで自動実行を配置しました。

その他のデータ:

  • Office 2007、
  • Windows Server2008R2。

を介してユーザー設定をフォアハンドで構成できる可能性があります。

君たちありがとう。

4

1 に答える 1

10

Workbooks.Openの2番目の引数はUpdateLinksです。Falseに設定します。

Workbooks.Open "C:\Test\WorkbookTest.xlsx",False
于 2012-10-04T20:17:38.297 に答える