VBA～ユーザーフォームのリストボックスにアイテムを追加しよう～Excel

ユーザーフォームのリストボックスにアイテムを追加したい場合はAddItemメソッドを設定します。

書き方

オブジェクト名.AddItem = アイテム名

オブジェクト名はユーザーフォームのオブジェクト名と、リストボックスのオブジェクト名を指定します。オブジェクト名の確認方法は作成したユーザーフォームファイルをクリックするとユーザーフォームが表示されます。ユーザーフォーム全体を選択するとプロパティウィンドウにオブジェクト名という項目があるので、それがユーザーフォームのオブジェクト名になります。次にリストボックスを選択すると同じようにリストボックスのオブジェクト名が確認できます。プロパティウィンドウが表示されていない場合はメニューの表示からプロパティウィンドウをクリックすると表示されます。

UserForm1というユーザーフォームを作成し、ListBox1というリストボックスを設定した場合、下のコードを実行するとリストボックスにアイテムが追加されます。

Sub test1()

Load UserForm1
UserForm1.ListBox1.additem "織田信長"
UserForm1.ListBox1.additem "豊臣秀吉"
UserForm1.ListBox1.additem "徳川家康"
UserForm1.Show

End Sub