如果文件名包含特定的字符串“ -Open”,则从“下载”中删除所有文件

时间:2019-05-10 15:29:06

标签: excel vba

我有一个启用宏的工作簿,该工作簿保存在通过Adobe体验管理器构建的网站资产文件夹中,该Adobe链接到共享驱动器。它打开,链接到文档,然后关闭自身。我需要宏然后返回并删除我的“ Opener File”,这是启用了宏的工作簿,因此最终用户下载的文件中没有多个Opener文件。

它将始终位于Downloads文件夹中,并且各种打开文件的名称都带有-Open。我是否可以使用特定的代码仅删除这些文件?它们都有不同的名称,例如“ Report 1-Open”或“ Report 2-Open”

1 个答案:

答案 0 :(得分:0)

您可以使用InStr函数检查一个字符串是否包含其他字符串:

IF INSTR(1, FILENAME, "Open") then DeleteFile.

FILENAME将是保存当前文件名的变量。