最近有个关于excel运用的需求,就是一张汇总表包含该路径下所有excel表格名称及路径跳转链接(点击跳转),同时需要在不同电脑端自动实时更新路径,这里浅浅记录下学习的步骤过程
背景
这个需求的诞生,是因为我们当前表格众多,配表有时需要好多表同时填写,但都在不同路径下,查找不便利
目的
实现一张表自动化跳转
步骤
①首先是如何遍历整个文件夹,寻找带.xls尾缀的表格,并获取路径

这个也是我网上搜索得出的,就不细讲
②如何实现填写不同标识文本,自动更新对应路径
这个是我写的(参考microsoft 帮助),就可以细讲下了,这个步骤我有两个优化前及优化后版本

优化前主要思路就是通过find函数来实现目标文本与路径匹配,再赋值到表格内,通过for循环实现全部遍历,但问题就是不能实现自动化,需要手改数值,可以通过do while来实现判断自动化

这样就可以通过判断单元格内是否有值来实现自动化
③跳转链接
这里我用的是excel公式,应该用vba也是可以的,用HYPERLINK()函数获取刚才第二部得到的路径,来实现点击跳转
④调用宏
刚才建立了两个宏,我新建了两个图形来实现点击调用,指定宏
成果

就会形成个这样的汇总表,我只需要更改绿色部分,再点击图形来实现刷新,就能够实现自动化跳转