T
Todd Huttenstine
The below code looks for values in the specified range and
adds that value to the listbox. What I would like is for
the code to skip over column Z(not add the value to the
list box) even if there is a value in that column in that
row. How would I do this?
Also I want the code to not add a value to the listbox if
it is is equal to "test".
Private Sub UserForm_Initialize()
Dim Rng As Range
With ListBox1
'Or With ComboBox1
.ColumnCount = 1
For Each Rng In Range("A4:AB4").Cells
If Rng.Text <> "" Then
.AddItem Rng.Text
End If
Next Rng
End With
End Sub
Thanx,
Todd
adds that value to the listbox. What I would like is for
the code to skip over column Z(not add the value to the
list box) even if there is a value in that column in that
row. How would I do this?
Also I want the code to not add a value to the listbox if
it is is equal to "test".
Private Sub UserForm_Initialize()
Dim Rng As Range
With ListBox1
'Or With ComboBox1
.ColumnCount = 1
For Each Rng In Range("A4:AB4").Cells
If Rng.Text <> "" Then
.AddItem Rng.Text
End If
Next Rng
End With
End Sub
Thanx,
Todd