如何實現打開工作簿就自動運行VBA代碼？

如何實現打開工作簿就自動運行VBA代碼？

如下圖所示的工作表，我希望在打開該工作簿時，用戶能看到一條關于該工作簿用途的提示消息，如何編寫VBA代碼？

答：有兩種實現方法。

第一種，使用Workbook_Open事件。代碼如下：

Private Sub Workbook_Open()

MsgBox “本工作簿用于記錄個人私密信息,外人請勿觀看!”

End Sub

注意，該代碼一定要在ThisWorkbook模塊中，如下圖所示。

第二種，使用Auto_Open()事件。在VBE中，插入一個標準模塊，輸入下面的代碼：

Sub Auto_Open()

MsgBox “本工作簿用于記錄個人私密信息,外人請勿觀看!”

End Sub

注意，該代碼在標準模塊中，且過程名為Auto_Open，如下圖所示。

用途

使用該方法，可以在打開工作簿時：

1.給用戶提示，無論是警告提示還是操作提示。

2.自動加載自定義的內容，包括定制的界面。

3.加密工作簿，只有用戶輸入正確的密碼，才能打開工作簿。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。