求问：如何用VBA获取已经修改后的活动图表的名称？

FENGJUN · 发表于 2004-12-15 10:48

通过“在选择图标对象时按住Ctrl键，则在名称框中出现"图标X"，更改即可。”的方法可以更改图表的名称，但却不能用以下代码获取之...

Sub Getname() MsgBox ActiveChart.Name End Sub

如何实现呢？

[此贴子已经被作者于2004-12-15 10:50:42编辑过]

chenjun · 发表于 2004-12-15 13:38

MsgBox ActiveChart.Parent.Name ActiveChart是Chart对象， ActiveChart.Parent是包含Chart的容器是个ChartObject对象，那才是出现在名称框中的名字。

FENGJUN · 发表于 2004-12-15 14:41

以下是引用chenjun在2004-12-15 13:38:00的发言： MsgBox ActiveChart.Parent.Name ActiveChart是Chart对象， ActiveChart.Parent是包含Chart的容器是个ChartObject对象，那才是出现在名称框中的名字。

“ActiveChart.Parent是包含Chart的容器”，明白了，好！

Bruce_xu · 发表于 2004-12-17 02:53

那顺便请教一下如何获得当前工作表和工作簿的名称呢？

Bruce_xu · 发表于 2004-12-17 03:00

我是指如何把这两个名称赋值给变量呢？

chenjun · 发表于 2004-12-17 13:42

以下是引用Bruce_xu在2004-12-17 2:53:00的发言： 那顺便请教一下如何获得当前工作表和工作簿的名称呢？

这已不是图表问题了，可以用下面的代码 wbName = ActiveWorkbook.Name '取当前工作薄名称 shName = ActiveSheet.Name '取当前工作表名称

Bruce_xu · 发表于 2004-12-20 02:40

谢谢chenjun版主。

我还有一个图表的问题，就是数据标志的值如果是0的话，有办法不让0显示出来么？（这是看完那个柱形堆积图后想到的，那个图如果显示值的话，会有很多0在图表上面。）。

chenjun · 发表于 2004-12-20 11:16

是哪一个？请给个链接！

Bruce_xu · 发表于 2004-12-26 21:28

是这一个，我在那一贴已经回过了，链接如下。

http://club.excelhome.net/dispbbs.asp?boardid=6&star=2&replyid=231037&id=51870&skin=0&page=1

		自动登录	找回密码
密码			免费注册