• 締切済み

エクセルのコマンドボックスを初期値に戻す方法を教えてください。

エクセルのコンボボックスに初期値を表示する方法を教えてください。 セル A1に "選んでください"    A2に りんご    A3に ばなな とあって、コンボボックスで「りんご」を選択すると  セルB1に 2 、「ばなな」を選択すると セルB1に 3 が返されるようにしています。 コマンドボタンを押すと、直近で何が選択されていても、 コンボボックスには 「選んでください」 セルB1には 1 が返されるようにしたいのですが、どうしたらいいでしょうか。  エクセルの ツール → ユーザー設定 → ツールバー → フォーム から 持って来たコンボボックスには 「ドロップ1」という名前がついています。 また、コマンドボタンは 同様にエクセルの ツール → ユーザー設定 → ツールバー → フォーム から 持ってきており、「ボタン1」という名前がついています。

みんなの回答

  • kazu1973
  • ベストアンサー率40% (14/35)
回答No.1

Private Sub ボタン1_Click() ドロップ1.Text = "選んでください" Range("B1").Value = 1 End Sub ↑これで、いけると思います。

ketoru_001
質問者

お礼

解決しました! Range("B1").Value = 1 を記述するだけでうまくいきました。 kazu1973様 どうもありがとうございました!

ketoru_001
質問者

補足

kazu1973様 さっそくご回答ありがとうございます。 試してみたのですが、 実行時エラー'424' オブジェクトが必要です。 と出て、デバックを押すと、 「ドロップ1.Text = "選んでください"」のところが 黄色くなってしまいました。

関連するQ&A