在操作工作簿的时候,常常需要先判断工作簿是否存在。常常使用Dir函数判断,具体看下面代码。 a=Dir(带文件名称的路径) 文件不存在,a返回: 文件存在,a返回文件名称: Dir函数是一个非常有用的函数,常常用来遍历多个工作簿。具体用法请自行百度学习。在这里只需要依样画葫芦就可以了。 下面用自定义函数来判断工作表是否存在,仍然是上面的栗子。 Function FileExists(sFile As String) As Boolean 'sFile是带文件名称的全路径 If Dir(sFile) <> '' Then FileExists = True End Function 当文件存在的时候FileExists返回true。 自定义函数往往更方便使用。 |
|
来自: L罗乐 > 《VBA基础入门教程》