本技巧的目的:掌握用代碼實現(xiàn)工作表的深度隱藏,強制用戶啟用VBA,否則無法看到表。
代碼助手:護眼背景,行號顯示及跳轉(zhuǎn),代碼收藏,中文變量的快速查詢輸入,大大提高了代碼輸入的效率。
代碼助手下載地址 http://excel880.com/blog/archives/11297
中文提示變量功能:
工作表深度隱藏的代碼:
當(dāng)宏被禁用時只有一張空白表,宏啟用時隱藏空白表
在事件代碼中輸入代碼:
在工作表打開時:
Worksheet.Visible 屬性:返回或設(shè)置一個值,它確定對象是否可見。
xlSheetHidden 隱藏工作表,用戶可通過菜單取消隱藏。
xlSheetVeryHidden 隱藏對象,重新可見的唯一方法是將此屬性設(shè)置為 True(用戶無法通過菜單取消隱藏)。
xlSheetVisible 顯示工作表。
也可以寫成 sheet4.Visible = False, sheet4.Visible = True
為了達到強制效果,還在關(guān)閉前寫入事件代碼:
sht.CodeName '工作表的代碼名稱