sal21
02-01-2006, 05:56 AM
In effect when the userform initialize i would want to show into first line of listbox1 the 6 value from the sheet named CODICI range S1:X1 with a little tipical border...
Have maked this but the value are out respect the first line...
Help me!
With Me.ListBox1
.Clear
.ColumnCount = 6
.ColumnHeads = True
.AddItem
For I = 0 To 5
.List(0, 0 + I) = Sheets("CODICI").Cells(1, 19 + I).Value
Next I
End With
see the image attached...
Have maked this but the value are out respect the first line...
Help me!
With Me.ListBox1
.Clear
.ColumnCount = 6
.ColumnHeads = True
.AddItem
For I = 0 To 5
.List(0, 0 + I) = Sheets("CODICI").Cells(1, 19 + I).Value
Next I
End With
see the image attached...