如何使用从Addin导入的用户定义类型？

Question

在 addin.xlam 我有：

Type Quantity
    i As Integer
end type

Sub show_quant(q as Quantiy)
    MsgBox(q.i)
end sub

在一本开放的工作簿中，我这样做：

Sub load_addin()
    Dim AI As Excel.AddIn
    Set AI = Application.AddIns.Add(Filename:="add_in.xlam")
    AI.Installed = True

    Dim q As Quantity
    show_quant(q)
End Sub

这不起作用。 Excel抱怨用户定义的类型尚未定义。

那么怎么做你声明一个在插件中定义的类型的变量？