Access VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2191 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【3536】リストボックスに値を入れる ガッツ 04/9/17(金) 1:17 質問[未読]
【3537】Re:リストボックスに値を入れる クロ 04/9/17(金) 8:08 回答[未読]
【3539】Re:リストボックスに値を入れる ガッツ 04/9/17(金) 11:33 お礼[未読]
【3536】リストボックスに値を入れる
質問  ガッツ  - 04/9/17(金) 1:17 -
引用なし
パスワード
   質問させていただきます。

リストボックスに値リストで数を入れようと思うのですが、
その際、ＶＢＡのコードで入れる値を書こうと思うのですが、
Rowsorceに値を書くと見出しに値が入ります。
リストボックスの一行目や、2行目に入れる場合どのように
したらよろしいのでしょうか？
【3537】Re:リストボックスに値を入れる
回答  クロ  - 04/9/17(金) 8:08 -
引用なし
パスワード
   コンボボックスプロパティの「列見出し」を「いいえ」に
するか、コードでFalseにしてあげればいいのでは？

Me.コンボボックス名.ColumnHeads = False
Me.コンボボックス名.RowSource = "1;2;3"

と書けば
1
2
3

Me.コンボボックス名.ColumnHeads = False
Me.コンボボックス名.ColumnCount = 2
Me.コンボボックス名.RowSource = "1;太郎;2;次郎;3;三郎"

と書けば
1 太郎
2 次郎
3 三郎
となります。
【3539】Re:リストボックスに値を入れる
お礼  ガッツ  - 04/9/17(金) 11:33 -
引用なし
パスワード
   クロ 様　返信ありがとうございます。

>Me.コンボボックス名.ColumnHeads = False
>Me.コンボボックス名.ColumnCount = 2
>Me.コンボボックス名.RowSource = "1;太郎;2;次郎;3;三郎"
>
>と書けば
>1 太郎
>2 次郎
>3 三郎
>となります。

なるほど、Me.リストボックス名.RowSource = "1;太郎;2;次郎;3;三郎"
と書けば、いいんですね。
1,2,3を書いていなかったので、全部同じ行の違う列で入ってしまいました。
クロ様ありがとうございました。m(_ _)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
2191 / 2272 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
1080804
(SS)C-BOARD v3.8 is Free