vba关闭当前文件并删除

vba关闭当前文件并删除,第1张

我们Excel中的VBA编程可以实现很多功能,除了能够处理Excel表格内部的数据之后,还可以对文件等进行 *** 控,今天就跟大家介绍一下怎么利用Excel中的VBA删除文件的具体 *** 作步骤。

1. 如图,我们在D盘根目录下选择一个文件,利用Excel中的VBA编程将该文件删除。

2. 首先打开电脑上的Excel表格,依次点击上方的“开发工具”---“Visual Basic”选项。

3. 在打开的VBA中,我们可以利用Kill函数将文件删除,将文件的完整路径作为其参数就可以了,如图,在打开的VBA编辑页面,输入代码:

Sub 鱼木混猪()

Kill "D:\ymhz.txt"

End Sub

4. 然后鼠标定位在代码中的任意位置,点击上方的“运行子程序”按钮。

5. 返回D盘,如图,刚才指定的文件就被删除了。

以上就是怎么利用Excel中的VBA删除文件的具体 *** 作步骤

你想删除的文件的名称例如文件名是中国什么省汇总.xls\x0d\x0aFN = "中国什么省汇总.xls"\x0d\x0a\x0d\x0aDim FileName As String\x0d\x0a\x0d\x0aFileName = Dir("D:\报表\*.xls")\x0d\x0aDo While FileName ""\x0d\x0aIf FileName = FN Then\x0d\x0aKill "D:\报表\" &FileName\x0d\x0aEnd If\x0d\x0aFileName = Dir\x0d\x0aLoop

使用Kill方法删除指定的文件,如下面的代码所示。

#001 Sub KillFile()

#002 Dim myFile As String

#003 myFile = ThisWorkbook.Path &"\123.xls"

#004 If Dir(myFile) <>"" Then Kill myFile

#005 End Sub

代码解析


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/tougao/11842376.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-19
下一篇 2023-05-19

发表评论

登录后才能评论

评论列表(0条)

保存