1.复制文件到指定文件夹
FileCopy path & Range("D" & j) & ".msg", newPath & Range("D" & j) & ".msg"
2.复制文件夹到指定文件夹
Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") fso.CopyFolder ThisWorkbook.Path & "\测试新建文件夹", ThisWorkbook.Path & "\2011年报表\" Set fso = Nothing
3.删除指定文件夹
If FileFolderExists(path) And Len(path) <> 0 Then Dim fs As Object Set fs = CreateObject("Scripting.FileSystemObject") fs.DeleteFolder path, True Set fs = Nothing End If
4.判断指定文件或者文件夹是否存在
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
相关推荐
vba函数说明,几乎所有vba函数的说明及实例
EXCEL VBA函数手册 很实用的EXCEL VBA函数手册值得收藏
工作表函数和VBA函数.zip源码EXCEL VBA宏编程Excel VBA实用技巧范例下载工作表函数和VBA函数.zip源码EXCEL VBA宏编程Excel VBA实用技巧范例下载工作表函数和VBA函数.zip源码EXCEL VBA宏编程Excel VBA实用技巧范例...
EXCEL VBA 函数查询,PDF格式。
Excel VBA函数参考手册,摘自Excel2003VBA帮助.
VBA 函数参考手册
Excel_vba函数大全:而且里边有例子,相信对你一定有用。
Excel VBA函数生成SQL
excel vba常用函数语法和使用参考,可作为工具查询,希望大家喜欢
EXCEL VBA函数手册
包括所有的函数,学习Excel VBA的必备函数表
EXCEL VBA函数精选详细介绍了EXCEL的函数功能如何在VBA中使用。
最全的VBA 函数,开发利器,熟悉VBA的朋友可以下载,我一直在用
我个人爱好Excel VBA,这是今天用1个多小时从 Microsoft Excel VBA 联机帮助里提取出来的,关于VBA 函数的使用帮助,是chm格式的,文件容量较精致,愿与朋友们分享!
EXCEL VBA函数 参考手册,含各类函数的说明,应用。
Excel VBA_自定义函数集