4.4.4-文件操作:复制、删除、重命名¶
文件的常见操作有复制、删除、重命名,以上操作对所有类型的文件都是通用的。
1)文件复制:FileCopy 原文件绝对地址,复制后文件的绝对地址,新生成了一个一模一样的文件
2)文件重命名:Name 原文件绝对地址 As 重命名后的文件绝对地址,没有产生新文件,只是修改了文件名,如果前后文件所处文件夹地址变了,表示移动了文件,也就是说该功能同样可以实现移动文件功能。
3)文件删除:Kill 文件绝对地址
以上三步操作都需要先确认该文件是否存在,对不存在的文件进行赋值、删除、重命名会报错。
Sub test4()
currentPath = ThisWorkbook.Path
folderAddress = currentPath & "\" & "删除"
fileXName = "1.txt"
fileXAddress = folderAddress & "\" & fileXName
newFileXAddress = folderAddress & "\2.txt"
new2FileXAddress = folderAddress & "\3.txt"
FileCopy fileXAddress, newFileXAddress
Name newFileXAddress As new2FileXAddress
Kill fileXAddress
End Sub