| |
|
|
Sample Macro コントロール・リストボックス |
 |
|
|
|
4-2-1) リストボックスのリストに追加する |
 |
 |
'=========================================================================================
Private Sub UserForm_Initialize()
For Each 各シート In Worksheets
ListBox1.AddItem 各シート.Name '※１
Next
End Sub
'=========================================================================================
＜コメント＞
※１ この例ではユーザーフォームのリストボックスのリストにブック内の各シート名を追加している
サンプルブックのダウンロードは ここをクリック （YNxv2342_listbox_set.xls 79KB）
※ 一旦、ブックをハードディスクに保存し、開き直してから実行してください。
|
|
