No.1ベストアンサー
- 回答日時:
全て選択解除したのち、遠藤と加藤を選択します。
リストボックスのMultiSelectプロパティがfmMultiSelectMulti
になっていることが前提です。
Private Sub CommandButton1_Click()
Dim i As Long
With ListBox1
For i = 0 To .ListCount - 1
.Selected(i) = False
Next
.Selected(1) = True '遠藤
.Selected(2) = True '加藤
End With
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 画像編集・動画編集・音楽編集 Windowsに付属しているビデオエディター。BGMを追加する方法は? 1 2022/06/26 08:54
- JavaScript jsで診断コンテンツのページ内切り替えについて 1 2023/04/14 17:31
- Visual Basic(VBA) 複数ファイルのデータの統合について 12 2022/05/14 12:03
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- その他(OS) DOSコマンド『dir』の『/o』オプション 3 2023/03/10 09:29
- Visual Basic(VBA) リストポックスについて 2 2022/11/05 20:48
- その他(ブラウザ) Mycrosoft Edge の「コレクション」に、画像とテキストを追加したい 2 2022/05/28 11:10
- Excel(エクセル) コンボボックス及びリストボックスを5段階連動させる方法をご存知の方ご教授頂きたいです。 Excelで 3 2022/04/03 21:43
- Windows 10 windowsのファイル複数選択について エクスプローラーなどでファイルを複数選択する際、 最初のフ 4 2022/05/22 16:39
- メルカリ メルカリに関しての質問です。 登録したお支払い用銀行口座を削除したいのですが、できません。 「支払い 1 2022/11/22 10:25
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルにカウンターを設置したい
-
javaのメイン関数 public stati...
-
Ctrlキーを押しながらのダブル...
-
Spread.NETの行削除について
-
最大化ボタンと最小化ボタンを...
-
【C#】 : WindowsProgramming ...
-
「alt+←」を無効にする方法は?
-
Shift Key 押下と押さない文字...
-
Javascriptでページ内容全体を...
-
コネクション・セッション・ト...
-
ポストバック時の画面スクロー...
-
パスワードつきホームページ ト...
-
複数選択のListBoxでClickイベ...
-
Pen と Pens の違い
-
PHPでログイン機能実装
-
タブを閉じる時メッセージを表...
-
Access2003のフォーム画面にて
-
Webページ上のボタン等の位置を...
-
ディスクのセッションを閉じる...
-
ボタンのなかに表示する文字を...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
c# 文字列の最後から1文字削除...
-
DataGridViewのチェックボック...
-
VBAで一時中断したプログラムの...
-
グリッドビューでのチェックボ...
-
SPREADでカーソルの位置を1行目...
-
JSPでメッセージボックスを表示...
-
ブラウザの×ボタン(閉じるボタ...
-
JSPでボタンを押したら、文字が...
-
Eclipseでクリーンが出来ない
-
最大化ボタンと最小化ボタンを...
-
Ctrlキーを押しながらのダブル...
-
メール添付されたPDFファイルが...
-
EXCEL2010でセルが編集中かを判...
-
今更、VBAでRPA、キーボード操...
-
CheckBoxをボタン形式にして押...
-
Fancyboxのiframe内に閉じるボタン
-
asp.net メッセージボックス表...
-
javascript 別ウィンドウを開...
-
エクセルにカウンターを設置したい
-
Excel:「フォーム」のボタンで...
おすすめ情報
ここまではできましたが、
選択されているのを一旦解除して
x = Array(0, 2)
.List(.ListIndex(x)) = True
これでだめでした。
なにか方法 わかる方おしえてくれませんでしょうか
Dim i As Long
With ListBox1
For i = 0 To .ListCount - 1
If .Selected(i) = True Then
.Selected(i) = False
End If
Next
End With