VBA技巧29 防止更改工作表的名称由刀豆文库小编整理，希望给你工作、学习、生活带来方便，猜你可能喜欢“防止更改工作表名称”。
技巧1 防止更改工作表的名称
工作表的名称显示在工作表标签上，除了在相应的功能菜单中可以对其进行重命名操作外，在工作表标签上双击鼠标也能修改工作表名称。一旦修改了工作表名称，可能就会产生一连串的问题，例如在其他工作簿中对该工作表的引用将会失效，通过工作表名称引用工作表的代码也将出错。
Excel没有提供修改工作表名称的相关事件，要禁止用户修改工作表名称，需采取其他一些技巧。比如在工作表BeforeClose事件中检验工作表名称，如果工作表名称不是指定的字符串，则将其修改为指定字符串，即保持工作表名称不变，代码如下。
#001 Private Sub Workbook_BeforeClose(Cancel As Boolean)#002 If Sheet1.Name “Excel Home” Then Sheet1.Name = “Excel Home” #003 ThisWorkbook.Save #004 End Sub 代码解析：
工作簿的BeforeClose事件过程，在关闭当前工作簿时判断Sheet1工作表名称，如果不是指定的字符串“Excel Home”，则将其恢复为“Excel Home”后保存工作簿，从而避免更改Sheet1工作表名称。
