Excel VBA質問箱 IV

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

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


30968 / 76732 ←次へ | 前へ→

【51023】Re:コンボボックスを空白にする方法
質問  Tsuyo  - 07/8/25(土) 22:42 -

引用なし
パスワード
   ▼ichinose さん:
こんばんは
返事が遅くなってすみません。
>Excel2002(Excel2000でも確認)で前回の投稿どおりの手順で行うと
>記述したとおりにエラーが発生し、記述したとおりにリストがクリアされますけどね!!

Excelは2007です。
Worksheets("sheet1").ComboBox1.Clear
では消えませんでしたが(エラーは出ません)
Worksheets("sheet1").ComboBox1.value = ""
を実行したら消えました。
という意味で前回は書きました。
>因みに
>Worksheets("sheet1").ComboBox1.Value = ""
>と
>Worksheets("sheet1").ComboBox1.ListFillRange = ""
>とでは、結果は違いますよ!!
少し勘違いをさせているようですが比べているのは
Worksheets("sheet1").ComboBox1.Clear 

Worksheets("sheet1").ComboBox1.value = "" 
です。
.Clearでは消えませんでしたが、.ComboBox.value=""
でやったら消えましたという意味です。

最初に質問したときは標準モジュールで
Sub test0()
 ComboBox1.Value = ""
End Sub
を実行したのですが上手くいかず,みなさんに教えていただいた
Sub test1()
  Worksheets("sheet1").ComboBox1.Clear
End Sub
を実行したところ、「予期せぬエラーが発生しました。」というエラーが発生したため、それはListFillRangeプロパティに値が設定されていることが原因だということを教えてもらったため
Sub test2()
  Worksheets("sheet1").ComboBox1.ListFillRange = ""
  Worksheets("sheet1").ComboBox1.Clear
End Sub
を実行したところ、エラーは発生しなくなりましたがコンボボックスを空白にすることはできませんでした。そこで
Sub test3()
  Worksheets("sheet1").ComboBox1.ListFillRange = ""
  Worksheets("sheet1").Value = ""
End Sub
を試したところコンボボックスが空白になり上手くいってしまったので喜んでいたのですが、ListFillRangeプロパティに値が入っていても
Sub test4()
  Worksheets("sheet1").Value = ""
End Sub
でもコンボボックスが空白になることが分かり少しショックを受けたのと同時に、Clearと""では同じ意味なのかと疑問に思いました。
これがいままでのまとめになります。
よろしくお願いします。
1 hits

【50923】コンボボックスを空白にする方法 Tsuyo 07/8/22(水) 14:57 質問
【50924】Re:コンボボックスを空白にする方法 Tsuyo 07/8/22(水) 15:02 質問
【50925】Re:コンボボックスを空白にする方法 ぱっせんじゃー 07/8/22(水) 15:03 発言
【50928】Re:コンボボックスを空白にする方法 Tsuyo 07/8/22(水) 15:52 質問
【50930】Re:コンボボックスを空白にする方法 neptune 07/8/22(水) 16:49 回答
【50942】Re:コンボボックスを空白にする方法 Tsuyo 07/8/22(水) 23:28 質問
【50948】Re:コンボボックスを空白にする方法 ichinose 07/8/23(木) 8:01 発言
【50965】Re:コンボボックスを空白にする方法 [名前なし] 07/8/23(木) 17:23 質問
【50966】Re:コンボボックスを空白にする方法 kobasan 07/8/23(木) 18:33 回答
【50967】Re:コンボボックスを空白にする方法 ichinose 07/8/23(木) 18:34 発言
【50980】Re:コンボボックスを空白にする方法 Tsuyo 07/8/24(金) 9:34 質問
【51009】Re:コンボボックスを空白にする方法 ichinose 07/8/24(金) 20:31 発言
【51023】Re:コンボボックスを空白にする方法 Tsuyo 07/8/25(土) 22:42 質問
【51029】Re:コンボボックスを空白にする方法 ichinose 07/8/26(日) 0:54 発言

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