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 は、ユーザー定義型がまだ定義されていないと不平を言います。
では、アドインで定義された型の変数をどのように宣言するのでしょうか?