リストビューの複数選択について

解決

ところさん 2005-08-08 23:32:54 No: 91353 IP: [192.*.*.*]

複数選択し選択した項目を表示するのはどうしたらいいのでしょうか？
検索してみてもリストボックスの複数選択の内容しかみつからず・・・。

For Each varItem In Me.ListView1.SelectedItem
Debug.Print varItem
Next

上記のコードではエラーになってしまいます。
ご教示いただけますようよろしくお願い致します。

編集削除

ねろ 2005-08-09 08:11:55 No: 91354 IP: [192.*.*.*]

こんなことですか。
'複数選択(取りあえず全部選択)
For i = 1 To ListView1.ListItems.Count
    ListView1.ListItems(i).Selected = True
Next

'選択行の書き出し
For i = 1 To ListView1.ListItems.Count
    If ListView1.ListItems(i).Selected = True Then
          Debug.Print ListView1.ListItems(i).Text
    End If
Next

編集削除

ところさん 2005-08-12 16:37:30 No: 91355 IP: [192.*.*.*]

For Eachではできないのですね。
ありがとうございました。

編集削除

特攻隊長まるるう 2005-08-12 16:52:38 No: 91356 IP: [192.*.*.*]

出来ないんじゃなくて１つも選択されてなかった時の
処理が考えられてないだけだと思う。
ちゃんとデバッグしてどういう状態の時にどこでエラーが
出てるか確認すれば分かる事です。

編集削除