利用VBA修改Excel工作表的CodeName
在微軟的Excel中,工作表的CodeName屬性是一個運行時不可更改的只讀屬性。但是如果我們想要通過代碼來修改工作表的Codename,該如何操作呢?下面將簡要介紹一些方法。修改Excel表中工作表
在微軟的Excel中,工作表的CodeName屬性是一個運行時不可更改的只讀屬性。但是如果我們想要通過代碼來修改工作表的Codename,該如何操作呢?下面將簡要介紹一些方法。
修改Excel表中工作表名稱
大家都知道,要修改Excel表中的工作表名稱很簡單,只需在工作表標簽上右鍵點擊選擇重命名,然后輸入新的名稱即可。但這個操作只修改了表格的顯示名稱,而沒有改變其CodeName。即使將Sheet5的名稱修改為“測試表單”,在VBAProject中,對應(yīng)的CodeName仍然保留為原來的Sheet5。用戶通常會對工作表名稱進行定義以便于區(qū)分,導致名稱和CodeName不一致的情況出現(xiàn)。
通過VBA編程實現(xiàn)CodeName的修改
由于Codename屬性是只讀的,無法直接更改,我們可以通過VBA編程的方式來實現(xiàn)CodeName的修改。工作表的CodeName實際上就是在VBE(Visual Basic for Applications)工程中工作表所在部件的名稱。通過修改VBE工程中對應(yīng)部件的名稱,來達到修改工作表的CodeName的目的。
步驟概述:
1. 點擊VBAProject下面的相應(yīng)工作表,在屬性中找到“名稱”,即工作表的CodeName,另外一個屬性是平時顯示的工作表名稱。
2. 在“名稱”屬性中輸入新的名稱,即可直接修改工作表的CodeName。
3. 運行VBA代碼,輸入新的CodeName后系統(tǒng)可能提示“未信任到VB工程訪問,請在信任選項中勾選VB工程訪問”。
4. 打開宏安全性配置窗口,勾選“信任對VBA工程對象模型的訪問”,然后確定。
5. 重新運行代碼,成功將工作表的CodeName修改為所需名稱。