Excel VBA質問箱 IV

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

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


62027 / 76732 ←次へ | 前へ→

【19315】コマンドボタンについて
質問  初心者  - 04/10/28(木) 9:20 -

引用なし
パスワード
   [本文なし]
配置

CommandButton1  CommandButton3  CommandButton3

          ComboBox1

以上のようにCommandButtonが3つとComboBoxが1つあります。
CommandButtonをクリックするとComboBoxのリストが替わるようにしようとしてます。

Private Sub CommandButton1_Click()
ComboBox1.RowSource = "データ!a1:a10"
End Sub

Private Sub CommandButton2_Click()
ComboBox1.RowSource = "データ!b1:b10"
End Sub

Private Sub CommandButton3_Click()
ComboBox1.RowSource = "データ!c1:c10"
End Sub

のように表すだけならすぐ出来るのですが、CommandButtonをクリックした時に
わざわざComboBox1のドロップボタンを押さずにリストまで現れるようにしたいのですが・・・

ComboBox1.DropButtonClick
をつけてみたのですがうまくまわりませんでした。
どのようにしたら良いのか教えてください。

0 hits

【19315】コマンドボタンについて 初心者 04/10/28(木) 9:20 質問
【19316】Re:コマンドボタンについて Jaka 04/10/28(木) 9:43 回答
【19317】Re:コマンドボタンについて 初心者 04/10/28(木) 9:50 お礼

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