[已解决]求解：VBA中引用工作表名称遇到的烦事

学习学习再学习

像下面的代码里引用到工作表名

Worksheets("汇总").Activate

现在的问题是这个工作表是可以改名的。一旦改名，代码就没用了。怎么让代码里的工作表名称随着工作表名改变而代码功能不受影响呢？

请教各位老师，谢谢了

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2013-4-4 23:50

你在VBE中看嘛。列表中先是代码名，代码名后拓号内包含的就是工作表名。

跳转到最佳答案楼层

hwc2ycy

用codename吧。一般都不会去改这个的。

hwc2ycy

Worksheet.CodeName 属性
返回对象的代码名。String 型，只读。
语法

表达式.CodeName

表达式   一个返回 Worksheet 对象的表达式。

说明


在“属性”窗口中“（名称）”右边的单元格中显示的值是所选对象的代码名。可以在设计过程中通过更改该值来改变对象的代码名。不能在运行过程中更改该属性。

对于一个返回指定对象的表达式，该表达式可使用对象的代码名。例如，如果第一张工作表的代码名为 Sheet1，则下列表达式是等价的。

Visual Basic for Applications
Worksheets(1).Range("a1")
Sheet1.Range("a1")

工作表的名称可以与其代码名不同。创建一张工作表时，其工作表名称和代码名是相同的，不过，更改工作表名称时并不影响其代码名，并且，更改工作表代码名（在 Visual Basic 编辑器中使用“属性”窗口）也不影响其名称。

学习学习再学习

hwc2ycy 发表于 2013-4-4 23:43
Worksheet.CodeName 属性
返回对象的代码名。String 型，只读。
语法

我不太懂，像我上面那个怎么样修改放到代码里功能不受影响呢？
能不能帮我直接修改写完整的代码呢？

hwc2ycy

hwc2ycy

你在VBE中看嘛。列表中先是代码名，代码名后拓号内包含的就是工作表名。

学习学习再学习

我这个叫汇总名的表是后来加上去的，肯定不是SHEET1，但我改成SHEET（1）并把它移到第一个工作表位子时，代码里指的就是这个工作表了，在代码工程管理里显示的是SHEET25

学习学习再学习

hwc2ycy 发表于 2013-4-4 23:47

明白这个简单问题了，我直接用管理器里代码名放到VBA里就行了，谢谢管理

su45

学习学习再学习 发表于 2013-4-5 00:04
明白这个简单问题了，我直接用管理器里代码名放到VBA里就行了，谢谢管理

http://www.excelpx.com/thread-34170-1-1.html