求助能人：内详，懂得入………………

xufei_fisher · 发表于 2011-12-31 11:25

本帖最后由 xufei_fisher 于 2011-12-31 12:49 编辑

各位进来的能人，我想到达到如下的结果，但是我不知道这是如何达到，请各位不吝指教：
假设工作簿中有10张工作表，但是打开文件进入工作簿时只显示1张工作表。这张显示出来的工作表中对于没有显示的9张工作表都有对应的超链接（或者按键），点击超链接（或者按键）可以显示这个超链接（或者按键）对应的工作表，再次点击超链接（或者按键）可以隐藏这个超链接（或者按键）对应的工作表。单元格或者光标一直停留在第一张工作表中。

谢谢大家啊，我是做审计的，领导要我做一套工作底稿，因为有很多表格，我想做在一个工作簿中，所以为了看上去清爽，需要做上面的这些动作。但是我又不知道这算是VBA还算是其他什么专业叫法，如果发错地方了，请各位谅解！！谢谢！

就像附件中所得到的结果，打开这个文件，下面显示只有参数这个sheet，双击C列中的sheet对应的单元格，就会显示对应的sheet，再取消选中，对应的sheet就隐藏掉了。

请问是怎么实现的，能教教我吗？

Audit - 审计程序表（企业会计制度）.rar (211.3 KB, 下载次数: 19)

清风云子 · 发表于 2011-12-31 11:39

既然你都知道是超链接，那就超链接咯，要是隐藏工作表嘛，就用按钮也行，第一张工作表上显示sheet2的按钮
的代码是：Sheet2.Visible = xlSheetVisible sheet2上的按钮代码是：sheet1.select； Sheet2.Visible = xlSheetVeryHidden

清风云子 · 发表于 2011-12-31 11:40

以此类推……

changxuegu · 发表于 2011-12-31 11:43

是这样吗？

xufei_fisher · 发表于 2011-12-31 12:02

changxuegu 发表于 2011-12-31 11:43
是这样吗？

有一点没达到，就是我想下面显示sheet名的地方是存在的，需要显示各个没有隐藏掉的sheet。

xufei_fisher · 发表于 2011-12-31 12:04

清风云子发表于 2011-12-31 11:39
既然你都知道是超链接，那就超链接咯，要是隐藏工作表嘛，就用按钮也行，第一张工作表上显示sheet2的按钮
...

哥哥，弄个实例给我看看好伐？我实在不懂啊！呵呵

fjzjm · 发表于 2011-12-31 12:22

是这样吗？

超链接工作簿.rar (8.32 KB, 下载次数: 10)

changxuegu · 发表于 2011-12-31 12:38

根据2楼的代码做的。

xufei_fisher · 发表于 2011-12-31 12:53

fjzjm 发表于 2011-12-31 12:22
是这样吗？

不好意思，不是，您这个如果把除了sheet1之外的sheet隐藏掉，通过超链接好像无法显示被隐藏的sheet哦！不过还是谢谢你的帮助！

xufei_fisher · 发表于 2011-12-31 12:55

本帖最后由 xufei_fisher 于 2011-12-31 13:00 编辑

changxuegu 发表于 2011-12-31 12:38
根据2楼的代码做的。

呀，前面开心太早了，接近了，但是还不是这样的，我修改了1楼，加了个实例，可是那个文件是加密的，我不知道怎么做一样的事情，能帮忙看看嘛？

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

[Excel基础] 求助能人：内详，懂得入………………