在与表格打交道的日常工作中,经常会遇到一个工作薄里包含众多工作表的情况,当工作表太多导致工作表标签显示不出来的时候,在各工作表之间切换查看数据就会非常不方便。 这时候我们通常就会提出一个问题,可不可以在一个目录工作表中创建带有其他所有工作表的链接,并且在每个工作表也创建一个超链接,使得每个工作表都能快速返回到目录工作表。问题的答案是肯定的。 解决这个问题通常有两种方法,一种方法是使用宏表函数,提取工作表名称,再辅以工作表函数HYPERLINK(link_location,friendly_name)来完成;另外一种方法是使用VBA代码自动实现这样的功能。 用宏表函数处理起来步骤略显繁琐,我们略过不表,单看如何运用VBA代码来创建工作表目录。 一个工作薄中有一系列工作表,如图 需要创建一个目录工作表并链接到其他各工作表,其他各工作表也带返回目录的超链接,如下图所示 VBA代码截图如下 在VBE中运行可段代码即可瞬间创建一个目录工作表,并且实现上述所有功能。第一创建目录后,可以在目录工作表中插入一个按钮,并给按钮指定这段VBA宏代码,以后如果工作表的增删变动,只要点一下按钮重新生成新的目录即可。 |
|