MS Access – 输出数据在Windows文件夹中,过程后可以删除吗?
不知道这个问题是否有意义或不在这里去:
所以我有一些VB从一些查询输出数据。 它只是将excel中查询结果数据集导出到excel文件中,有几个这样做。 这些都是自动的(在窗体上打开和closures事件),作为一个小自动化技巧的一部分,我使用它来创build一个PowerPoint演示文稿(或者最终让用户这样做),运行一堆顶部N的查询,然后创build图表,然后用图表和数据创buildppt。
等等等等,所以我想知道的是,是否有一种方式访问我可以清空该特定文件夹(删除所有这些输出excel文件)在过程结束。 因为它们不断被删除,或者下一次运行,你最终会得到25个“你想replace这个文件吗?” 消息,这只是烦人的。 我很确定有一个这样做的macros观方法….但我真的不知道?
我这样导出他们的原因是我需要数据与演示文稿中的图表相匹配,而我所能达到的最佳方式(相对)是从excel复制并粘贴到ppt的注释部分。 我不知道如何从vb进入笔记部分,我不知道如何从excel vb到笔记部分,所以这将不得不做我想。
多谢你们!
您可以使用
Kill (strPath)
从磁盘删除文件,其中strPath
是文件的path。 根据需要重复。
如果你不想列出每个文件,你可以把这样的东西:
del C:\FolderName\*.xls
在batch file中。
然后在VBA中运行batch file:
Call Shell("C:\folderdelete.bat")
或者如果你感觉更多的代码中心:
Dim sDelFile As String sDelFile = Dir$("c:\FolderName\*.xls") Do While sDelFile <> "" Kill "c:\FolderName\" & sDelFile 'need to specify full path again because a file was deleted 1 MyFile = Dir$("c:\FolderName\*.xls") Loop
在投入生产之前,我真的会testing这个。