Excel VBA質問箱 IV

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

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


1933 / 13645 ツリー ←次へ | 前へ→

【70918】コンボボックス トキノハジメ 12/1/17(火) 10:10 質問[未読]
【70919】Re:コンボボックス UO3 12/1/17(火) 10:30 発言[未読]
【70930】Re:コンボボックス トキノハジメ 12/1/18(水) 12:21 質問[未読]
【70920】Re:コンボボックス UO3 12/1/17(火) 10:33 発言[未読]
【70931】Re:コンボボックス トキノハジメ 12/1/18(水) 13:59 質問[未読]
【70932】Re:コンボボックス UO3 12/1/18(水) 16:51 発言[未読]
【70933】Re:コンボボックス UO3 12/1/18(水) 16:54 発言[未読]
【70934】Re:コンボボックス トキノハジメ 12/1/18(水) 18:30 質問[未読]
【70949】Re:コンボボックス UO3 12/1/20(金) 9:22 発言[未読]
【70977】Re:コンボボックス トキノハジメ 12/1/23(月) 9:09 お礼[未読]

【70918】コンボボックス
質問  トキノハジメ  - 12/1/17(火) 10:10 -

引用なし
パスワード
   いつもおせわになります。
コンボボックスで下記のコードを入れたのですが
クリックしても選択候補が表示されないのですが
何か足りないのでしょうか?

Private Sub UserForm_Initialize()
  With ComboBox1
    .AddItem "札幌"
    .AddItem "金沢"
    .AddItem "東京"
    .AddItem "名古屋"
    .AddItem "奈良"
    .AddItem "京都"
    .AddItem "阪神"
    .AddItem "福岡"
  End With
End Sub

【70919】Re:コンボボックス
発言  UO3  - 12/1/17(火) 10:30 -

引用なし
パスワード
   ▼トキノハジメ さん:

こんにちは
こちらで、このままコピペしてユーザーフォームを表示させましたけど
ちゃんとコンボボックスのリストに反映していますよ?

何か、このComboBox1のプロパティとして、特別なものを設定しているということはないですか?
念のためなんですけど、このコードは、ユーザーフォームモジュールに書いてありますよね?

【70920】Re:コンボボックス
発言  UO3  - 12/1/17(火) 10:33 -

引用なし
パスワード
   ▼トキノハジメ さん:

そんなことはしておられないとは思いますが、ComboBox1のイベントプロシジャで
たとえば

Private Sub ComboBox1_DropButtonClick()
  ComboBox1.Clear
End Sub

こんなのがあると、リストはからっぽになりますけど・・・

【70930】Re:コンボボックス
質問  トキノハジメ  - 12/1/18(水) 12:21 -

引用なし
パスワード
   ▼UO3 さん:

ご指導有難うございます。
ユーザーフォームでつくりましたが何も表示は有りません。
プロパティは何も変えていません。
ワークシートでもやってみましたがおなじです。
何かワークシート等に表示するコード別にいるのでしょうか?
もう一つ作成の手順がよくわからないのですみません。  
>▼トキノハジメ さん:
>
>こんにちは
>こちらで、このままコピペしてユーザーフォームを表示させましたけど
>ちゃんとコンボボックスのリストに反映していますよ?
>
>何か、このComboBox1のプロパティとして、特別なものを設定しているということはないですか?
>念のためなんですけど、このコードは、ユーザーフォームモジュールに書いてありますよね?

【70931】Re:コンボボックス
質問  トキノハジメ  - 12/1/18(水) 13:59 -

引用なし
パスワード
   ▼UO3 さん:
有難うございます゜
作っただけで下記のようなことも何もしていません。
シート上でコマンドボタンはいつも使っているのですが
コンボボックスは初めてなのでコードを記述しただけのところです。
他にシートに表記するコードが必要なのでしょうか


>そんなことはしておられないとは思いますが、ComboBox1のイベントプロシジャで
>たとえば
>
>Private Sub ComboBox1_DropButtonClick()
>  ComboBox1.Clear
>End Sub
>
>こんなのがあると、リストはからっぽになりますけど・・・

【70932】Re:コンボボックス
発言  UO3  - 12/1/18(水) 16:51 -

引用なし
パスワード
   ▼トキノハジメ さん:

コードは「どこに」書きましたか?

【70933】Re:コンボボックス
発言  UO3  - 12/1/18(水) 16:54 -

引用なし
パスワード
   ▼トキノハジメ さん:

VBE画面で、左上のプロジェクトエクスプローラのUserForm1と表示されているところを
右クリックして、コードの表示を選んでください。
そこがユーザーフォームモジュールですけど、そこに、トキノハジメさんが書いたコードがありますか?

【70934】Re:コンボボックス
質問  トキノハジメ  - 12/1/18(水) 18:30 -

引用なし
パスワード
   ▼UO3 さん:
指定のuserForm1の中にコードは有りますが

>VBE画面で、左上のプロジェクトエクスプローラのUserForm1と表示されているところを
>右クリックして、コードの表示を選んでください。
>そこがユーザーフォームモジュールですけど、そこに、トキノハジメさんが書いたコードがありますか?

【70949】Re:コンボボックス
発言  UO3  - 12/1/20(金) 9:22 -

引用なし
パスワード
   ▼トキノハジメ さん:

おはようございます

>指定のuserForm1の中にコードは有りますが

アップされたコードが当該ユーザーフォームのモジュールに書かれていて
かつ、ComboBox1 に関して、特段のプロパティ設定もイベント処理も
なされていないとすれば、当方の理解では、リストは、正しく表示されるはず。

ですから、これ以上は、お手伝いできそうにないですねぇ。
With ComboBox1
ここにブレークポイントを設定し、フォーム表示させて、ここからF8で
ステップ実行してみられたらいかがでしょう?
(このブレークポイントでとまるかどうかも検証のポイント)

【70977】Re:コンボボックス
お礼  トキノハジメ  - 12/1/23(月) 9:09 -

引用なし
パスワード
   ▼UO3 さん:
色々と有難うございました。
もう少し勉強してみます。また、疑問があればおしえてください。

>>指定のuserForm1の中にコードは有りますが
>
>アップされたコードが当該ユーザーフォームのモジュールに書かれていて
>かつ、ComboBox1 に関して、特段のプロパティ設定もイベント処理も
>なされていないとすれば、当方の理解では、リストは、正しく表示されるはず。
>
>ですから、これ以上は、お手伝いできそうにないですねぇ。
>With ComboBox1
>ここにブレークポイントを設定し、フォーム表示させて、ここからF8で
>ステップ実行してみられたらいかがでしょう?
>(このブレークポイントでとまるかどうかも検証のポイント)

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