[求助]用什么语句可将隐藏的定义名称显示出来呢?!

仁者乐山 · 发表于 2007-5-7 16:09

以前在不同的工作薄中定义了不少的名称,最近把有的工作薄打开,定义的名称却不见了,我试图用activeworkbook.names.application.visible=true 语句显示其名称,但还是不行,有一点可以肯定,定义的名称仍然还在的,因为我还可以引用它,但就是看不见它.请各位高手赐教,怎么让隐藏的定义的名称显示呢?!先谢谢了!!

自己经过反复测试已解决这个问题了,前提是在知道定义名称的情况下可以用names("定义名称").visible=true语句显示其定义名称,但还有一个问题要向高手请教,如果在不知道定义名称的情况下,又如何让其显示呢?先谢谢了!

[此贴子已经被作者于2007-5-7 16:47:46编辑过]

lwxg · 发表于 2007-5-7 16:41

Sub t()
dim c as name
For Each c In Application.Names
c.Visible = True
Next c
End Sub

[此贴子已经被作者于2007-5-7 16:41:49编辑过]

仁者乐山 · 发表于 2007-5-7 16:56

楼主的方法我已经测试过,完全可以,非常感谢!再次谢谢你!!

lwxg · 发表于 2007-5-7 17:10

不客气,你自己已经在门口了,可惜没有推门进去.

下次努力啊.

[em05]

dongfei_1972 · 发表于 2009-1-3 00:05

Thanks for your information

nbqmdzlcdint · 发表于 2010-10-27 23:08

楼主辛苦了

努力加油学习中

shidaity · 发表于 2011-12-9 15:57

多谢分享！

sakana01 · 发表于 2014-12-4 17:49

lwxg 发表于 2007-5-7 16:41
Sub t()dim c as nameFor Each c In Application.Names    c.Visible = TrueNext cEnd Sub
...

原来每次复制表格都点击接近100次，用此法解决了大问题，节约了时间，拯救了生命啊！感谢……

サルのモモ · 发表于 2018-3-25 19:24

非常感谢，刚好找这个

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

[求助] [求助]用什么语句可将隐藏的定义名称显示出来呢?!

谢谢分享努力学习中

[求助] [求助]用什么语句可将隐藏的定义名称显示出来呢?!

谢谢分享 努力学习中

谢谢分享努力学习中