在寫VBA中常需要引用某個WorkSheet對象,一般通過工作表名
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Sheet2Name")
或者索引號
Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets(2)
來引用。但這樣做有一個不好的地方,就是如果工作表改名或者工作簿有刪除、插入動作,以上引用可能會失效。但使用Code Name在上面兩種情況下都會一直有效(在VBA里一張工作表對象顯示為Sheet2(Sheet2Name),Code Name即為"Sheet2」,可通過屬性窗口修改為有意義的字串):
Dim ws As Worksheet
Set ws = Sheet2
而且在寫法上也更簡單。
但有一個缺點,跨工作表時這種方法就無效了。