いつもお世話になっています VBA リストボックスを一度に全て選択するコード教えていただきたいです

いつもお世話になっています
VBA
リストボックスを一度に全て選択するコード教えていただきたいです
また一度に選択解除も知りたいです
宜しくお願いできますでしょうか

No.1 ベストアンサー 回答者： めぐみん_ 回答日時： 2019/12/12 20:16

どのリストボックスなのかと思いましたが、とりあえずユーザーフォームと賭けに出て。

Dim i As Integer

For i = 0 To ListBox1.ListCount - 1
ListBox1.Selected(i) = True
Next

無論マルチセレクトが有効であるとしてですけどね。

この回答へのお礼

いつも本当にありがとうございます

お礼日時：2019/12/12 21:35

No.2 回答者： めぐみん_ 回答日時： 2019/12/12 20:19

あ、解除を忘れました。

ListBox1.Selected(i) = True

を

ListBox1.Selected(i) = False

にして下さい。