いつもお世話になっております
やりたいことは、
ユーザーフォームを起動したら、
近藤を選択状態にしておきたいのです。
検索してしらべましたが、.ListIndex = 2
で行けるのかなと思いましたが、
だめでした。
わかる方おしえてくれませんでしょうか
Private Sub UserForm_initialize()
With ListBox1
.Font.Size = 14
.AddItem "近藤"
.AddItem "遠藤"
.AddItem "佐藤"
.AddItem "工藤"
.ListIndex = 2
End With
End Sub
No.2ベストアンサー
- 回答日時:
No1です。
私の環境では、指定通りに選択された状態になります。
表示時のイニシャライズ設定の内容は、ご提示の内容だけでしょうか?
何かご質問文には記載の無い、別の設定などが影響している可能性はありませんか?
あるいは、試しにListBox1だけのフォームを作成して、ご提示のSubだけを記載した上で、フォームを表示しても選択状態は反映されませんか?
No.1
- 回答日時:
こんばんは
>検索してしらべましたが、.ListIndex = 2
>で行けるのかなと思いましたが、
どこから「2」になったのか不明ですが・・
ListIndexプロパティは選択行のインデックスを示します。
設定する場合は、取得する際と同じ数値になります。
ご提示の場合「近藤」は1番目になりますので、0を設定しておけば宜しいでしょう。
(index値は0始まりです)
.ListIndex = 0
に変えれば、ご質問のようになりませんか?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ListBox1をClickしたときのイベント 5 2022/12/11 19:45
- Visual Basic(VBA) リストボックス セルの値を取得する 1 2022/05/21 20:47
- Visual Basic(VBA) VBAユーザーフォームの複数のコンボボックスについて。 1 2022/04/25 08:13
- Visual Basic(VBA) ユーザーフォームに2つのコンボボックス銀行名「ConboBox1」支店名を「ConboBox2」とし 4 2022/08/03 17:34
- Visual Basic(VBA) リストポックスへの抽出方法 1 2022/08/10 17:58
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Visual Basic(VBA) userformでSheetを選択して開くコード 1 2023/05/15 16:27
- Visual Basic(VBA) ユーザーフォームの表示を追加したい 2 2023/03/26 23:18
- Visual Basic(VBA) フォーム上のリストボックスに重複して表示しています 3 2022/10/19 11:55
- Visual Basic(VBA) VBAチェックボックスで有効無効切り替えできるように 5 2022/10/21 16:13
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
アウトルックが起動しているか...
-
リムーバブルディスクのフォー...
-
VBSで起動したアプリが前面表示...
-
別アプリの起動、終了について
-
VBSから別のVBS起動するとき変...
-
ウィンドウを終了させたい・・・
-
VBで実行中のEXEファイルの情報...
-
64bitで作ったEXEを32bitで起動...
-
Windows上のプログラム。「予め...
-
VBAでIEが起動しているか...
-
phpで、メール自動受信を作りたい
-
2重起動の制御に関して
-
ACCESS VBAで別のACCESS(mdb)を...
-
WinSCPで画像のように puttyを...
-
vba 時間の引き算 例えば 15:00...
-
イベントプロシージャ 印刷が...
-
excel vbaから実行するexe実行...
-
Designer.vbは直接コードをいじ...
-
vbaでPDFファイルが印刷されない
-
VBscriptでPDFファイルを直接印...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
アウトルックが起動しているか...
-
VBAでOutlookを終了させたい Ex...
-
VBSから別のVBS起動するとき変...
-
Windows上のプログラム。「予め...
-
VBSで起動したアプリが前面表示...
-
VBで実行中のEXEファイルの情報...
-
キー操作 (WSH:コピー&ペー...
-
EXCEL VBAから他アプリケーショ...
-
Process.Startで起動したアプリ...
-
VBAでSeleniumからChromeを起動...
-
64bitで作ったEXEを32bitで起動...
-
ACCESS VBAで別のACCESS(mdb)を...
-
「FindWindow」、ウィンドウハ...
-
VBAでIEが起動しているか...
-
Shellで起動したプログラムのウ...
-
VBSでExcelのUserFormをエクス...
-
Vba アプリケーションが立ち上...
-
exeファイルを実行するとすぐに...
-
フォームの最前面が効かない
-
別アプリの起動、終了について
おすすめ情報
いつもお世話になっております
それが.ListIndex = 0
でも
.ListIndex = 1
にしてもなにもユーザーフォームを立ち上げても
選択されず 困っています。
Me.ListBox1.ListIndex = Me.ListBox1.ListCount - 1最終行
調べましたが、 だめでした
ListBox1だけのフォームを作成して行うと
うまくいきました。