VBA：新收藏 - ＆gt;模块不是有效类型

Question

我正在尝试使用集合作为函数的一部分，但是我在编译时不断收到错误：“模块不是有效类型”。

即使函数只是定义了一个集合，我也会这样：

Function CountUniqueTags()
    Dim table As Collection
    Set table = New Collection
End Function

此代码位于标准模块中，但错误意味着我应该在类模块中编写它，但Collection是一个内置类，所以我没有看到这个问题？

Answer 1

这让我也疯了一会儿。我有一个文件中的代码工作正常。复制代码，转到另一个文件，添加并重命名模块，粘贴在代码中，突然代码无法编译！在我看到一个给我提供我需要的线索之前，我读了几个无用的答案。

错误消息指出“A 模块不是有效类型”（请注意强调“模块”一词）。这意味着您指定的类型（在您的情况下，“Collection”）也是模块的名称。

如果您将模块“Collection”重命名为其他名称，则错误将消失。