vba - 在 Excel XLA 加载项中公开类

Question

我为 Excel 编写了一个 XLA 加载项。该插件包含一个类模块。我想知道如何公开此类模块以供使用。我四处搜索并找到了一种使用 Visual Studio 来完成此操作的方法，但遗憾的是我没有 Visual Studio。有没有办法仅通过 XLA 来做到这一点？

Answer 1

您可以在 XLA 中创建一个返回类实例的公共(public)函数。然后，任何引用 XLA 的工作簿都可以调用该函数。假设您有包含 Class1 的 Book2 和要使用 Class1 的 Book3。将 Class1 Instancing 属性更改为 Public Not Creatable(在类模块中按 F4)。

在 Book2 中的标准模块中创建一个函数

Public Function InstantiateClass1() As Class1

    Set InstantiateClass1 = New Class1

End Function

在Book3中，调用函数

Public Sub DoStuff()

    Dim clsClass1 As Book2Project.Class1

    Set clsClass1 = instantiateclass1

    clsClass1.prop = "something"

    Debug.Print clsClass1.prop

End Sub

在此示例中，Class1 有一个名为 prop 的属性。 Book2 的 VBProject 名称已更改为 Book2Project。