ForEachについて (ID:90235)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 リストボックスの選択した内容をテキストボックスに反映させようと考えているのですが、 ヘルプを見てみるとForEachをつかっているようです。 以下ヘルプを引用 Sub RowsSelected() Dim ctlList As Control, varItem As Variant ' リスト ボックスを示す Control オブジェクトを取得します。 Set ctlList = Forms!社員!在籍支社 ' 選択項目を列挙します。 For Each varItem in ctlList.ItemsSelected ' 連結列の値を表示します。 Debug.Print ctlList.ItemData(varItem) Next varItem End Sub そこでForEachを使う必要性はないんじゃ？と思い、 Debug.Print ctlList.ItemData(ctlList.ItemSelected) としたのですがエラーになってしまいます。 なぜForEachを使う必要があるのでしょうか？ ご教示よろしくお願いいたします。