excel更改工作表名稱 通過代碼實現禁止更改Excel工作表名稱的方法

excel更改工作表名稱 通過代碼實現禁止更改Excel工作表名稱的方法，前天剛學習了一個excel的新技術，叫“excel更改工作表名稱”授課老師對我們說，這一技術的專業全稱為“excel更改工作表名稱 通過代碼實現禁止更改Excel工作表名稱的方法”今天寶寶把這個技術分享給大家，不用謝哦~

在Excel中，工作表名稱顯示在工作表標簽上，用戶可以任意對其進行更改。Excel VBA并沒有提供修改工作表名稱時觸發的事件，但是可以通過為工作表的Deactivate事件添加代碼來檢測工作表名稱是否改變以達到禁止工作表更名的目的。本文介紹通過為工作表的Deactivate事件添加代碼來實現禁止為工作表更名的方法。

1、啟動Excel并打開Visual Basic編輯器，在工程資源管理器中雙擊需要禁止更名的工作表選項打開其“代碼”窗口，在其中輸入程序代碼，如圖1所示。具體的程序代碼如下所示：

Private Sub Worksheet_Deactivate()

If Me.Name<>"銷量統計表"Then

Me.Name="銷量統計表"

MsgBox"工作表禁止更名!"

End If

End Sub

圖1　打開“代碼”窗口并輸入程序

2、切換到Excel，對名為“銷量統計表”的工作表進行更名操作，當操作完成后切換到其他工作表時將觸發Deactivate事件過程，給出提示對話框，工作表恢復為設定的名稱，如圖2所示。

圖2　程序給出提示對話框同時工作表名恢復為設定名稱