ＶＢＡのListBoxで複数選択してExcelの１つのセルに反映

いつもお世話になります。
出来るか教えて欲しいのですが、

UserFormに「ListBox」と「Commandbutton」があります。
「ListBox」には５つの選択肢がありますが、これを複数選択可に
して、「Commandbutton」をクリックすることにより、
Excelの１つのセルに「ListBox」で選択した項目を反映させることは
出来ますか？

出来る場合どのようにすれば宜しいでしょうか？

No.1 ベストアンサー 回答者： redfox63 回答日時： 2008/02/16 22:36

ListBoxのSelectedプロパティを使えばどのアイテムが選択されているか確認出来ます

ボタンのクリックイベントで
dim n as integer, s as string
for n = 0 to ListBox1.Count-1
　　if ListBox1.Selected( n ) then
　　　　s = s & ListBox1.List( n )
　　end if
Next
Range("A2").value = s
といった具合で出来るかと思います

この回答へのお礼

早速の回答有難うございました。
無事出来ました。

お礼日時：2008/02/16 23:08