Excel VBA 移动文件和文件夹

之前有博主的方法，然后觉得可以1和2结合一下，所以试试看。

先放上Excel VBA 移动文件和文件夹的方法。等我研究一下再放新方法。学习学习~

1、移动指定文件：

Public Sub 移动文件()Dim myFile As StringDim myNewFilePath As StringDim fso As Scripting.FileSystemObjectmyFile = ThisWorkbook.Path & "\test.txt"    '要移动的文件myNewFilePath = ThisWorkbook.Path & "\hhh\"    '要移动的位置Set fso = New Scripting.FileSystemObjectIf fso.FileExists(myFile) Thenfso.MoveFile myFile, myNewFilePathMsgBox "已经将文件 " & myFile & " 移到了文件夹 " & myNewFilePathElseMsgBox "要移动的文件不存在"End IfSet fso = Nothing
End Sub

2、移动文件夹：

Public Sub 移动文件夹()Dim myFolder As StringDim myNewFilePath As StringDim fso As Scripting.FileSystemObjectmyFolder = ThisWorkbook.Path & "\myfolder"    '要移动的文件夹myNewFilePath = ThisWorkbook.Path & "\testfile\"    '要移动的位置Set fso = New Scripting.FileSystemObjectIf fso.FolderExists(myFolder) Thenfso.MoveFolder myFolder, myNewFilePathMsgBox "已经将文件夹 " & myFolder & " 移到了文件夹 " & myNewFilePathElseMsgBox "要移动的文件夹不存在"End IfSet fso = Nothing
End Sub

Excel VBA 移动文件和文件夹相关推荐

【Excel VBA】遍历获取文件夹下所有文件——每月自动汇总考勤数据实例
纲举目张说明关键技术点:Dir函数代码code 运行效果图使用说明说明本次所讲的遍历获取某文件夹下所有文件,其实是我的<每月自动汇总考勤数据>案例中的其中一个知识点,近期我将会 ...
Excel VBA 利用FileSystemObject处理文件
Excel VBA 利用FileSystemObject类处理文件 FileSystemObject介绍 FileSystemObject是Windows Script Host Object Mod ...
Excel VBA中判断word文件是否打开，未打开则打开该文件
需求与场景在Excel的VBA中,打开Word文件是比较容易的,但判断某个word文件是否已经打开,则有些小坑需要注意. 因为工作需求,要把Excel中的数据写入到指定的word文件里(用链接的方式 ...
利用Excel VBA SQL做特殊文件浏览器
1.利用JamShellBrowser for ActiveX '转载请注明:本文来自:Excel吧 (www.excelba.com) 详细出处参考:http://www.excelba.com/A ...
vba访问文件服务器,使用Excel VBA获取共享点文件夹的内容
通常,我使用这段代码来检索VBA中文件夹的内容. 但这在共享点的情况下不起作用. 我能怎么做 ? Dim folder As folder Dim f As File Dim fs As New Fi ...
vba移动文件_Excel VBA之FSO-2.3文件夹的移动
Excel VBA之FSO-2.3文件夹的移动前景提要我们之前接触了如何通过FSO来实现文件夹的复制操作,此操作需要注意的一点就是如果当前文件夹中有历史版本的同名文件夹的话,他会直接覆盖原来的数据 ...
ubuntu复制文件到另一个文件夹_Excel VBA之FSO-2.2文件夹的复制
Excel VBA之FSO-2.2文件夹的复制前景提要昨天我们首次接触了ADO中FSO的使用,并演示了如何通过FSO来创建一个文件夹,删除文件夹以及判断文件夹是否存在的操作,虽然还是再说文件夹,但 ...
判断文件夹存在_Excel VBA之FSO-2.3文件夹的移动
Excel VBA之FSO-2.3文件夹的移动前景提要我们之前接触了如何通过FSO来实现文件夹的复制操作,此操作需要注意的一点就是如果当前文件夹中有历史版本的同名文件夹的话,他会直接覆盖原来的数据 ...
提取文件名+复制+改名+批量创建文件程序（Excel VBA版）
用Excel VBA做了个文件处理小工具,集合了文件名提取.文件复制.改名及批量创建文件.搜索复制文件的功能. (注:如果是规则改名,建议使用拖把更名器,使用起来更直观,下载链接中附拖把更名器程序) ...

Excel VBA 移动文件和文件夹

Excel VBA 移动文件和文件夹相关推荐

最新文章

热门文章