Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
21515 / 76807 ←次へ　｜　前へ→
【60690】Re:リストボックスで選択した名前をセルに入れたいんですが
発言  Jaka  - 09/3/9(月) 9:43 -
引用なし
パスワード
   こういうので良いんじゃないですか?

Dim Flg As Boolean

If ListBox1.ListIndex < 0 Then
　 Flg = True
End If
If ListBox2.ListIndex < 0 Then
　 Flg = True
End If
If ListBox3.ListIndex < 0 Then
　 Flg = True
End If
If ListBox4.ListIndex < 0 Then
　 Flg = True
End If

If Flg = True Then
　 MsgBox "選択されていないリストボックスがあります", vbExclamation
　 Exit Sub
End If

Range("A1").Value = ListBox1.List(ListBox1.ListIndex)
Range("A2").Value = ListBox2.List(ListBox2.ListIndex)
Range("A3").Value = ListBox3.List(ListBox1.ListIndex)
Range("A4").Value = ListBox4.List(ListBox1.ListIndex)
1 hits
▼ 【60620】リストボックスで選択した名前をセルに入れたいんですが みどり 09/3/5(木) 12:51 質問
【60621】Re:リストボックスで選択した名前をセルに... kanabun 09/3/5(木) 13:18 発言
【60622】Re:リストボックスで選択した名前をセルに... みどり 09/3/5(木) 15:33 質問
【60623】Re:リストボックスで選択した名前をセルに... kanabun 09/3/5(木) 15:50 発言
【60625】Re:リストボックスで選択した名前をセルに... Jaka 09/3/5(木) 16:28 発言
【60626】Re:リストボックスで選択した名前をセルに... Jaka 09/3/5(木) 16:33 発言
【60636】Re:リストボックスで選択した名前をセルに... Jaka 09/3/6(金) 9:19 発言
【60653】Re:リストボックスで選択した名前をセルに... みどり 09/3/6(金) 15:47 質問
【60654】Re:リストボックスで選択した名前をセルに... Jaka 09/3/6(金) 16:22 発言
【60656】Re:リストボックスで選択した名前をセルに... みどり 09/3/6(金) 16:58 質問
【60690】Re:リストボックスで選択した名前をセルに... Jaka 09/3/9(月) 9:43 発言≪
【60696】Re:リストボックスで選択した名前をセルに... みどり 09/3/9(月) 16:41 質問
【60697】Re:リストボックスで選択した名前をセルに... Jaka 09/3/9(月) 17:30 発言
【60700】Re:リストボックスで選択した名前をセルに... みどり 09/3/9(月) 20:03 質問
【60706】Re:リストボックスで選択した名前をセルに... Jaka 09/3/10(火) 9:15 発言
【60709】Re:リストボックスで選択した名前をセルに... みどり 09/3/10(火) 11:34 お礼
【60713】Re:リストボックスで選択した名前をセルに... Jaka 09/3/10(火) 11:47 発言
【60714】Re:リストボックスで選択した名前をセルに... みどり 09/3/10(火) 14:41 お礼
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
21515 / 76807 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free