用VBA判断指定的excel文件夹或文件是否存在
发布时间：2023-07-13 00:53:30
标签：代码,指定,文件,文件夹,Excel函数
有时我们需要用VBA代码判断某个文件夹或文件是否存在，以便进行后续操作。可以用下面的代码来实现这个功能：
Public Function FileFolderExists(strFullPath As String) As Boolean
On Error GoTo EarlyExit
If Not Dir(strFullPath, vbDirectory) = vbNullString Then FileFolderExists = True
EarlyExit:
On Error GoTo 0
End Function
将上述代码放入标准模块中，如果指定的文件夹或文件存在，FileFolderExists返回True。调用上述代码的方法：
1.判断文件夹是否存在：
Public Sub TestFolderExistence()
If FileFolderExists("c:\windows\") Then
MsgBox "指定的文件夹存在！"
Else
MsgBox "指定的文件夹不存在！"
End If
End Sub
将代码中的“c:\windows\”换成指定的文件夹，“c:\windows\”也可以写成“c:\windows”，即不要后面的“\”。
2.判断文件是否存在：
Public Sub TestFileExistence()
If FileFolderExists("d:\Book1.xls") Then
MsgBox "指定的文件存在！"
Else
MsgBox "指定的文件不存在！"
End If
End Sub
0
投稿猜你喜欢
现象重现步骤如下：第一步：在A1:C4区域分别输入数字。实际区域可自己选定，数字也可根据自己的喜好来输。 第二步：- 在编辑和阅读文档的时候，为了保护我们的眼睛，我们可以在wps表格中使用护眼模式，下面就让小编告诉你 wps表格怎样使用护眼模式的方法。wps
- 安装了win10和其它系统的双系统之后，我们开机时会出现系统选择倒计时，时间到了从默认的系统进入，不过一些些朋友反馈5秒或10秒左右的等待时
- Win11 alt+tab切换不了界面什么原因？有的用户在确认了自己的电脑按键正常的情况下，发现自己在使用这个组合快捷键去进行界面切换的时候
- 众所周知，电脑每次在启动的时候，首先启动的就是bios系统，bios负责管理与设置硬件，但是当我们想要升级bios的时候要怎么操作升级呢？接
- excel选项按钮带图表该怎么做？图表中包含很多值，条件不同的时候显示的数据图表也不同，今天我们就来看看Excel带选项按钮的图表制作的方法
- 360安全卫士是用户们用来查杀病毒、保护电脑和数据安全的一款软件。随着时代的发展，360卫士的功能也变得多种多样，不仅仅可以很好地查杀病毒，
- 如果我们在演示PPT时候，中途需要插入一个很大的EXCEL表格，我们可以怎么做呢?对于新手来说还是有一定难度，怎么办?下面让小编为你带来ex
- 关于excel的Criteria1用法实例，是结合VBA来使用的，下面是关于Criteria1用法的几个例子，希望对你有所帮助。Sub Si
- 编辑word文档时，有时要为文字添加下划线表示强调，那么word文档中的文字怎么在下面加下划线?下面小编就为大家详细介绍一下，来看看吧wor
- 微软发布Office2013距今已经有一段时间了，但是很多用户下载更新了Office2013后，却发现安装之后的Office2013无法使用
- Win10系统中预装了非常多的功能，在实际使用时会发现没有想象中的顺畅，这些功能占用系统资源，如果电脑配置差点还会出现卡顿现象。所以在安装W
- wps office设置分数单元格格式？在使用WPS表格录入数据时，若我们想要将小数快速转换成分数，该怎么操作呢？▪以此数据表格为例，选中单
- Word 2003巧除网页文章中的干扰码!常上网收集资料的网友大概都遇到过“干扰码”，特别是从论坛中获取的内容，复制粘贴到文本文件中时，经常
- 现在有了新的Apple TV 4K客户，一些用户在尝试使用重新设计的Siri Remote控制视频时报告了问题。具体来说，在新的Clickp
- 第一步：菜单栏点击“插入--页眉”，然后在点击“页眉布局--页眉边框”，弹出一个边框和底纹。 第二步：在打开的边框
- 原来我的一位学生，现在做电商数据分析，天天对着大量数据分析，而，商品货号有相似，核对起来很是费劲，一会儿就头昏脑涨。原来她看过一篇文章，就提
- 我们现在的Mac 使用的是超快但也超贵的SSD，所以大多数人在买之前都会再三评估自己会用到的容量，很多人都会买的刚刚好。这样就必须得常常去检
- 通过Photoshop软件来进行人物磨皮是非常基本的操作，使用PS软件也能实现这种效果，不过今天在这边给大家介绍一款滤镜工具叫做Portra
- Apple 在iOS 15和 macOS Monterey 中即将推出的 Private Relay 功能是隐私的福利，当您在欧洲旅行时，P
