EXCEL管理文件函数
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
05AD5-565A3-9A930-8AAC6
当一个文件夹中的文件较多时，查找起来不方便，可以用一个Excel 文件把所有的文件名列出来，并可根据需要设置单击后链接打开，方法如下：
新建一个 Excel 文件并保存，文件名为 AllFiles。
单击菜单插入—名称—定义（或按快捷键Ctrl+F3），“在当前工作簿中的名称”框中输入 myPath，在“引用位置”框中输入
=REPLACE(CELL("filename",INDIRECT("A1")),FIND("[",CELL("filename",INDIRECT("A1"))),1000,"")，
单击“添加”按钮，用同样的方法添加一个名称 myFiles=FILES(myPath&"*.*")，单击“确定”按钮。
在工作表单元格输入=INDEX(myFiles,ROW(1:1))，回车后，文件AllFiles所在目录文件夹下第一个文件名就出来在单元格中，把公式向下复制后，所有文件名都列出来了，当下拖的单元格超过文件夹中所有文件数的时候，单元格会出现错误值 #REF! ，我们可以加一个判断条件来取消错误值，使单元格为空，公式改为=IF(ROW(1:1)>COLUMNS(myFiles),"", INDEX(myFiles,ROW(1:1)))，错误单元格就成为空单元格了。
还可以修改一下公式，使选定单元格里，能打开单元格里所显示的文件。=IF(ROW(1:1)>COLUMNS(myFiles),"",HYPERLINK(myPath&INDEX(myFiles,ROW(1:1)),"GoTo "&INDEX(myFiles,ROW(1:1))))。
今后，你只要把文件AllFiles 文件复制到其他目录下，该目录下的所有文件名都会列出在 AllFiles 文件中。
如果不想把目录下的所有文件名都列出来，只想把某一类型的文件名列出来，如 文件扩展名为*.xls（Excel 文件），只需修改名称myFiles=FILES(myPath&"*.xls")就可以了。