Excel VBA質問箱 IV

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

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


19715 / 76732 ←次へ | 前へ→

【62445】Re:コンボボックスの表示について
回答  つん  - 09/7/22(水) 16:56 -

引用なし
パスワード
   ▼T-K さん
どもども

>【Q1】
>私は、Worksheets("RowSource_List").Range("B2:B15")が、
>UserForm1のComboBox" & ○に格納されるのだろうと考えてました。
>ところがマクロを実行してみると、そのマクロボタンのあるシートのセル範囲
>(仮にシート1)が一覧されてしまうのです。
>参照するシート、セル範囲を指定しているのに何故でしょうか??

>Worksheets("RowSource_List").Range("B2:B15").Address

って、シートから指定してるつもりでも、得られる文字列は、「"B2:B15"」
になるので、結局アクティブシートのそのセル範囲が設定されてしまいます。

MsgBox Worksheets("RowSource_List").Range("B2:B15").Address
で何が表示されるか試されたらよくわかると思います。

シート名から指定するんだったら、

RowSource = "Sheet1!a1:a5"

かなあ。

>【Q2】
>cboNumberSeasonのコンボボックスが一覧しません。
>多分、cboNumberSeasonの変数型が整数だからかなと思っていますが、
>Range("E2:E5")は、文字データです。
>それをコンボ有効にするにはどうしたらよいでしょうか。

cboNumberSeasonは、コンボボックスの番号を指してるので関係ないと思いますが・・・
こちらで簡単にテストしてみたけど、問題なかったけどなー

Private Sub Userform_Initialize()
  Dim cboNumberYear As Integer
  Dim cboNumberSeason As Integer
  
  For cboNumberYear = 1 To 3
    UserForm1.Controls("ComboBox" & cboNumberYear).RowSource = "Sheet1!a1:a5"
  Next cboNumberYear
 
  For cboNumberSeason = 4 To 6 ’※
    UserForm1.Controls("ComboBox" & cboNumberSeason).RowSource = "Sheet1!b1:b5"
  Next cboNumberSeason
  
End Sub

テストするのに適当に変えてますが。。。
※・・の部分ですよね?
ここに設定するデータを文字列にしたけど、問題あらへんかったよ?

ところで、これって、コンボボックス1〜3と、7〜9は、各々同じ値が設定されることになるけど、それはOKなんすか?


ところでその2、引用部分なんやけど、不必要な部分は削除してくれたほうがすっきりしてええと思いまする。
91 hits

【62412】コンボボックスの表示について T-K 09/7/21(火) 15:35 質問
【62413】Re:コンボボックスの表示について つん 09/7/21(火) 15:53 回答
【62415】Re:コンボボックスの表示について T-K 09/7/21(火) 16:20 お礼
【62417】Re:コンボボックスの表示について つん 09/7/21(火) 16:36 発言
【62423】Re:コンボボックスの表示について T-K 09/7/21(火) 17:42 回答
【62432】Re:コンボボックスの表示について つん 09/7/22(水) 10:31 発言
【62440】Re:コンボボックスの表示について T-K 09/7/22(水) 16:24 質問
【62445】Re:コンボボックスの表示について つん 09/7/22(水) 16:56 回答
【62448】Re:コンボボックスの表示について ひつまぶし 09/7/22(水) 17:19 発言
【62467】Re:コンボボックスの表示について T-K 09/7/23(木) 9:30 お礼
【62433】Re:コンボボックスの表示について neptune 09/7/22(水) 11:01 発言
【62441】Re:コンボボックスの表示について T-K 09/7/22(水) 16:33 お礼
【62414】Re:コンボボックスの表示について ponpon 09/7/21(火) 16:11 発言
【62422】Re:コンボボックスの表示について T-K 09/7/21(火) 17:37 お礼

19715 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free