エクセルVBAで以下のような方法でコンボボックスのリストを更新しようとしています。
参照セルの値が変わった場合に、コンボボックスのリストを削除して、新たな値をリストとして取り込みたいと思って、以下のようなコードを実行しましたが、
削除はできても、リストの追加時に"書き込みできません"というエラーが出てしまいます。
下記ロジックにかかわらず、「コンボボックスのリストを一旦クリアして、再度追加する」方法をアドバイス願います。
For i = 1 To 10
ComboBox2.RemoveItem (0)
Next
For j = 1 To 10
ComboBox2.AddItem Worksheets("Tool").Cells(j, 2).Value
Next
A 回答 (4件)
- 最新から表示
- 回答順に表示
No.4
- 回答日時:
Clear、AddItemなどしなくても、Bのコードを後出することで、AからBにきり変えられませんか。
VB的発想からエクセルVBA発想に切りかえる。一応テストではそのようになりました。Sub test01()
Worksheets("sheet1").ComboBox1.ListFillRange = "a1:a8" 'A
' Worksheets("sheet1").ComboBox1.ListFillRange = "b1:b5" 'B
End Sub
No.3
- 回答日時:
#2の方が書かれてますが、
ComboBox2.Clear
で削除できました。
追加はtonkatsuさんが書かれてるコードで追加できました。
この回答への補足
皆様、ご回答ありがとうございます。
.clearを使うと、リストだけで無く、コンボボックスのテキストまでも消されてしまうのですよね。
それだと、都合が悪くて、どうしたものかと悩んでます。
No.2
- 回答日時:
そのコードは、何処に記述しているのですか?
ユーザーフォームの名前を指定していないということは、同じフォームの何かの
イベントプロシージャに記述しているように思いますが、それでしたら、
そのコードで動作します。
ただ、削除するのは、こんな感じでいいかと思います。
Private Sub CommandButton1_Click()
Dim j As Integer
Me.ComboBox2.Clear
For j = 1 To 10
Me.ComboBox2.AddItem Worksheets("Tool").Cells(j, 2).Value
Next
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) ユーザーフォームに2つのコンボボックス銀行名「ConboBox1」支店名を「ConboBox2」とし 4 2022/08/03 17:34
- Visual Basic(VBA) ExcelVBA ドロップボックスで月を選択するとそれ以降のデータが残るようにしたい。 3 2022/12/16 14:53
- Visual Basic(VBA) VBA ドロップダウンリストを残して値のみクリア 2 2022/10/27 05:42
- Visual Basic(VBA) ユーザーフォームの表示を追加したい 2 2023/03/26 23:18
- Visual Basic(VBA) 3つのプロシージャをまとめたら実行時エラー発生で対応不能 6 2022/05/17 01:47
- Visual Basic(VBA) ユーザーフォームの書き出しで追加のご相談 ユーザーフォームの値をシートに書き出す際、コードが表示され 2 2022/08/05 10:58
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- HTML・CSS VB.net コンボボックス 2 2022/06/30 20:37
- Visual Basic(VBA) 複数シートの複数列に入力されているデータを重複なしで抽出するVBAを作りたいです。 9 2022/06/17 10:33
- Access(アクセス) access フォーム 大分類、小分類 1 2022/08/11 18:03
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
入力した値をコンボボックスにすぐに反映させる方法
Excel(エクセル)
-
VBAコンボボックスの内容が反映されない
その他(プログラミング・Web制作)
-
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
-
4
VBAでユーザーフォームを再表示させたい。
Excel(エクセル)
-
5
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
6
コンボボックス内の文字サイズ変更
Excel(エクセル)
-
7
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
8
UserForm1.Showでエラーになります。
工学
-
9
コンボボックスにリストが表示されません・・・
Excel(エクセル)
-
10
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
11
EXCEL VBAのコンボボックスに取り込むリストについて
Excel(エクセル)
-
12
コンボボックスの自動更新について
Excel(エクセル)
-
13
エクセルVBAでフォームのListboxをスクロールするには?
その他(Microsoft Office)
-
14
コンボボックス ▼ボタンをクリックしたらイベント
PowerPoint(パワーポイント)
-
15
VBA コンボボックスとテキストボックスを連結させたい
Visual Basic(VBA)
-
16
DATE型変数を初期化する方法
Visual Basic(VBA)
-
17
エクセルでエラーが出て困っています。
Excel(エクセル)
-
18
TextBoxから数字が文字として入力される?
Visual Basic(VBA)
-
19
テキストボックスの番号を使ったFor~Next文について
Visual Basic(VBA)
-
20
エクセルVBA ユーザーフォーム 複数のコンボボックス 同一リスト
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
首吊りどこ締めるの
-
白血球が多いとどんな心配があ...
-
ある範囲のセルから任意の値を...
-
検便についてです。 便は取れた...
-
彼女のことが好きすぎて彼女の...
-
精液の落とし方を教えてください
-
Excelで""で囲む方法
-
2つの数値のうち、数値が小さい...
-
甲状腺が腫れているが血液検査...
-
EXCELで条件付き書式で空白セル...
-
精子が黄色?
-
勃起する時って痛いんですか? ...
-
エクセル指定した範囲からラン...
-
Excel 0目標に対して数字があ...
-
値が入っているときだけ計算結...
-
アクエリアスが苦く感じる
-
リンク先のファイルを開かなく...
-
小数点以下を繰り上げたものを...
-
EXCELで式からグラフを描くには?
-
これって喉仏ですか? 私は女性...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
首吊りどこ締めるの
-
白血球が多いとどんな心配があ...
-
検便についてです。 便は取れた...
-
勃起する時って痛いんですか? ...
-
彼女のことが好きすぎて彼女の...
-
腕を見たら黄色くなってる部分...
-
精子が黄色?
-
EXCELで条件付き書式で空白セル...
-
至急!尿検査前日にオナニーし...
-
これって喉仏ですか? 私は女性...
-
中出しをするとお腹が痛い・・・。
-
甲状腺が腫れているが血液検査...
-
2つの数値のうち、数値が小さい...
-
尿検査前日に自慰行為した時の...
-
EXCELで式からグラフを描くには?
-
小数点以下を繰り上げたものを...
-
ある範囲のセルから任意の値を...
-
口の中に黒い血の塊
-
【Excelで「正弦波」のグラフを...
-
エクセル指定した範囲からラン...
おすすめ情報