下記の例は一旦、項目を配列(Variant)に入れ、配列からListBoxへ入れています。 Private Sub UserForm_Initialize() Dim myData(2, 2) As Variant UserForm6.Caption = " ...
確定! 回上一頁