エクセルVBAでフォームのListboxのリストの数を取得するには？

ワークシート上に貼り付けたリストボックスがあります。
このリストボックスはOLEObjectではなくフォームのリストボックスです。

このリストボックスにリストが何項目セットされているのか取得したいのです。
Set myLb = ActiveSheet.ListBoxes(Application.Caller)
MsgBox myLb.Name
MsgBox myLb.ListIndex.Count
とやってみたところ、名前は取得できましたが、項目数はエラーになってしまいました。

あと、可能ならListの2番目にセットされている項目の文言を取得する方法もあれば知りたいと思います。

宜しくお願いします。

No.1 ベストアンサー 回答者： xls88 回答日時： 2009/10/26 10:21

下記を試してみてください。

MsgBox myLb.ListCount
MsgBox myLb.ListIndex
MsgBox myLb.List(myLb.ListIndex)
MsgBox myLb.List(2)

この回答へのお礼

ありがとうございます。
質問以外のところまで完璧なご回答をいただき感謝したします。
急いでいたのでとてもたすかりました！！

お礼日時：2009/10/26 10:51