Excel用のCOMをC#で作っております。
Parameter.cs
[ClassInterface(ClassInterfaceType.None)]
[ComDefaultInterface(typeof(IParameter))]
[ComVisible(true)]
public class Parameter : IParameter
{
public Member[] Members { get; set; }
public Parameter()
{
Members = new Member[2];
Members[0] = new Member(){ Name = "A"};
Members[1] = new Member(){ Name = "B"};
Members[2] = new Member(){ Name = "C"}
}
}
IParameter.cs
[InterfaceType(ComInterfaceType.InterfaceIsDual)]
[ComVisible(true)]
public interface IParameter
{
Member[] Members { get; set; }
}
VBA側でMemberクラスのインスタンスを生成する場合、以下のように記載
Dim param as Object
Set param = CreateObject("Parameter") ← 成功
Dim count as Integer
count = UBound(param.Members) ←countには2が入る
MsgBox param.Members(0).Name ←Error! 0番目の要素にアクセスできない
説明が長くなりましたが、上記でUBound(param.Members)では要素の数によって正しくUBound()の値が返ってきますが、各要素にアクセスしようとするとエラーになります。
エラーメッセージは以下の通りです。
Wrong number of arguments or invalid property assignment
どのようにすれば各要素にアクセスすることができるのでしょうか。
Member
クラスor構造体の詳細や保持している値についても質問に追記してみてください。こちらの記事が似たような使い方の内容を扱っているようです。COM Object Arrays From VB