【原】纯函数版文件管理模板-制作教程！

 

以上功能，肯定很多有VBA基础的同学，都想到了使用VBA做的，但是他只是通过单纯的函数做的！让我们一起带大家学习一下吧！

函数版目录制作教程

我们已获取以下目录中的文件为例进行说明：

F:\03_Excel专题\01 常用Excel\常用代码\常用代码整理

第一步：使用宏表函数FILES 定义名称

操作细节：

1、点击 【公式】 - 【定义名称】 ，在编辑名称中

名称(N)  : 文件列表

引用位置(R）: 

=FILES("F:\03_Excel专题\01 常用Excel\常用代码\常用代码整理\*.*")

2、FILES函数解析：

• FILES属于宏表函数，不可以直接使用，必须通过定义名称使用
• FILES就一个参数那就是文件的路径，支持通配符！
• 返回的就满足条件的所有文件名称（内存数组）

第二步：取出文件名称

1、我们先通过动画带大家看一下FILES的结果，是包括所有文件的水平内存数组

▼ 结果包括所有文件名称

2、现在我们就利用INDEX函数把文件名依次依次取出存放到单元格中！

直接取出来，因为超过文件个数就会报错，考虑一下容错处理！

=IFERROR(INDEX(文件列表,ROW(A1)),"")

通过以上两步，我们已经可以把指定列路径中的文件全部取出，下一步就是制作超链接，方便我们直接打开！

第三步：制作文件超链接，方便直接打开

=HYPERLINK("F:\03_Excel专题\01 常用Excel\常用代码\常用代码整理\"&A1,A1)

制作超链接的公式比较简单，第一参数是全部路径，第二参数是超链接要显示的文字！

通过动画，我们来看一下，是否可以直接打开！

▼ 动画演示-直接点击超链接打开文件

以上其实我们就已经完成了，根据路径制作文件目前了，只是现在还不够智能

需要优化的地方

1、目录被写死，我们可以通过单元格的方便，让用户自己输入，根据输入的路径自动提取

2、提供关键词查找功能，只提取包含关键的文件名称！

下面我们就基于以上做一些优化处理

优化01 | 自由目录路径及公式优化

▼ 目录制作结构

▼ 文件列表公式修改

=FILES(目录!$C$2& "\" & 

    IF(目录!$C$3="","*","*"&目录!$C$3&"*")

&".*")

公式解析：

1、把固定的路径我们使用C2单元格代替，后续用户可以自己在C2输入想要获取文件名称的路径即可

2、关键的处理，我们使用IF来判断，如果没有输入关键词，那么我们还是返回星号（*），也就是返回全部内容，如果有输入内容，那么我们就使用包含的逻辑处理-  *关键词*

3、最后拼接上的是通用的后缀名 -  (.*）

优化02  |  一步建立超链接及序号

咋一看，上面的公式也太复杂了吧，其实大部分内容都是相同的！按结构来看如下：

=HYPERLINK(目录路径&"\"&文件名称,文件名称)

序号公式，主要判断一下文件链接 是否为空，不是空就显示序号，否则显示为空！

=IF(C6="","",ROW(A1))

功能全面演示

今天的教程就先到这里，赶紧动手试试吧！

如有帮助，“三连”+关注！