用宏表关闭表格的问题

路过人 · 发表于 2005-5-11 18:39

还有个问题我也看不懂，在thisworkbooks中有个过程：

Sub hidename() Dim Auto_Activate As Name For Each n In ActiveWorkbook.Names Auto_Activate.Visible = True Next Auto_Activate End Sub

但是我看不出它在什么地方被引用了。是不是被隐藏了？

路过人 · 发表于 2005-5-11 19:04

以下是引用taller在2005-5-10 9:36:00的发言： 选中宏表的A1插入Name为Auto_open,打开时就可以自动运行了

那为什么老刀兄的例子里没有插入Auto_open呢？而且，我附件中也插入了，但是结果还是不对呢？

ClhjExIl.rar (1.34 KB, 下载次数: 13)

路过人 · 发表于 2005-5-13 20:13

顶。高手，帮帮忙吧。谢谢了!

老刀 · 发表于 2005-5-15 17:51

auto_open在禁用宏时也被禁止了。应该用auto_activate。auto_activate只在工作表级有效，每个sheet都应插入auto_activate 宏表的宏应用RETURN结束

路过人 · 发表于 2005-5-15 18:11

老刀兄，可是我看来看去，都不知道我哪出错了。

PLW1txfZ.rar (5.28 KB, 下载次数: 12)

老刀 · 发表于 2005-5-15 19:22

定义工作表级事件应输入sheet1!auto_activate

宏表完整代码： =IF(B1=2,GOTO(A4),) =RETURN()

=ALERT("你禁止了宏",2) =FILE.CLOSE(FALSE) =RETURN()

路过人 · 发表于 2005-5-15 19:54

那为什么你的例子里看不到“定义工作表级事件sheet1!auto_activate”呢？

能不能帮我的附件作个修改呢？有劳了。

Nm1Itwcu.rar (5.73 KB, 下载次数: 11)

[此贴子已经被作者于2005-5-15 19:56:08编辑过]

老刀 · 发表于 2005-5-15 21:14

LNv26poa.rar (5.74 KB, 下载次数: 51)

UNARTHUR · 发表于 2005-5-15 21:27

老刀大师真是贵人少出手，出手就不凡啊，佩服！

路过人 · 发表于 2005-5-16 15:49

以下是引用老刀在2005-5-15 21:14:00的发言：

不知是什么原因，我打开后取消宏，还是无法自动关闭呀？

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

参考