B
BEETAL
I am trying to do the following stuff.
1. Create a Combobox or Listbox whichever is appropriate to store integer
values, textsuch as names,other values if needed.
2. I want to link the items to another 'call, such as
If item chosen in the box is Obama,then paste " President of US of A" in a
cell. Other characteristics also can be pasted in adjacent cells by using few
more codes.
I got the folowing code from Excel Help which I miserably failed to run.
Sorry, I feel a little ashamed that after so many years this Form stuff is
yet to be understood.
Thanks in advance for all the help.
The code ----- How to run it. I just copied it from VBA help.
ListBox Control, Column, ColumnCount, List Properties Example
'
The following example loads a two-dimensional array with data and, in turn,
loads two ListBox controls using the Column and List properties. Note that
the Column property transposes the array elements during loading.
To use this example, copy this sample code to the Declarations portion of a
form. Make sure that the form contains two ListBox controls named ListBox1
and ListBox2.
Dim MyArray(6,3)
Private Sub UserForm_Initialize()
Dim i As Single
'The 1st list box contains 3 data columns
ListBox1.ColumnCount = 3
'The 2nd box contains 6 data columns
ListBox2.ColumnCount = 6
'Load integer values into first column of MyArray
For i = 0 To 5
MyArray(i, 0) = i
Next i
'Load columns 2 and three of MyArray
MyArray(0, 1) = "Zero"
MyArray(1, 1) = "One"
MyArray(2, 1) = "Two"
MyArray(3, 1) = "Three"
MyArray(4, 1) = "Four"
MyArray(5, 1) = "Five"
MyArray(0, 2) = "Zero"
MyArray(1, 2) = "Un ou Une"
MyArray(2, 2) = "Deux"
MyArray(3, 2) = "Trois"
MyArray(4, 2) = "Quatre"
MyArray(5, 2) = "Cinq"
'Load data into ListBox1 and ListBox2
ListBox1.List() = MyArray
ListBox2.Column() = MyArray
End Sub
Thank You
1. Create a Combobox or Listbox whichever is appropriate to store integer
values, textsuch as names,other values if needed.
2. I want to link the items to another 'call, such as
If item chosen in the box is Obama,then paste " President of US of A" in a
cell. Other characteristics also can be pasted in adjacent cells by using few
more codes.
I got the folowing code from Excel Help which I miserably failed to run.
Sorry, I feel a little ashamed that after so many years this Form stuff is
yet to be understood.
Thanks in advance for all the help.
The code ----- How to run it. I just copied it from VBA help.
ListBox Control, Column, ColumnCount, List Properties Example
'
The following example loads a two-dimensional array with data and, in turn,
loads two ListBox controls using the Column and List properties. Note that
the Column property transposes the array elements during loading.
To use this example, copy this sample code to the Declarations portion of a
form. Make sure that the form contains two ListBox controls named ListBox1
and ListBox2.
Dim MyArray(6,3)
Private Sub UserForm_Initialize()
Dim i As Single
'The 1st list box contains 3 data columns
ListBox1.ColumnCount = 3
'The 2nd box contains 6 data columns
ListBox2.ColumnCount = 6
'Load integer values into first column of MyArray
For i = 0 To 5
MyArray(i, 0) = i
Next i
'Load columns 2 and three of MyArray
MyArray(0, 1) = "Zero"
MyArray(1, 1) = "One"
MyArray(2, 1) = "Two"
MyArray(3, 1) = "Three"
MyArray(4, 1) = "Four"
MyArray(5, 1) = "Five"
MyArray(0, 2) = "Zero"
MyArray(1, 2) = "Un ou Une"
MyArray(2, 2) = "Deux"
MyArray(3, 2) = "Trois"
MyArray(4, 2) = "Quatre"
MyArray(5, 2) = "Cinq"
'Load data into ListBox1 and ListBox2
ListBox1.List() = MyArray
ListBox2.Column() = MyArray
End Sub
Thank You