Excel VBA“喜欢”没有选择“*M*”

Question

以下代码为名称为“2017-10-16”而没有“M”的文件夹执行“Then”语句，尽管该代码似乎要求它同时具有“M”和日期。 有谁知道为什么语句的第一部分对于没有“M”的文件夹返回 true，或者这里可能发生了什么？

    If _
        objSubFolder.Path Like "*M*" And _
        objSubFolder.Path Like "*" & Format(DateLoop, "yyyy-mm-dd") & "*" _
    Then
        MsgBox objSubFolder.Name

Answer 1

我使用的是 .Path 方法而不是 .Name 方法，所以我拉的是整个路径而不是文件夹名称。

If _
    objSubFolder.Name Like "*M*" And _
    objSubFolder.Name Like "*" & Format(DateLoop, "yyyy-mm-dd") & "*" _
Then
    MsgBox objSubFolder.Name

作品。