Naziv Status
Stevan 1
Stevan_Stevan 2
Stevan Stevan 3
Stevan Stevan 2 Stevan 4
Na userform dodao sam Listbox koji ucitava podatke iz navedene tabele.
Ovo je kod:
Private Sub UserForm_Click()
i = 1
Do While Sheets(1).Cells(i, 1) <> ""
i = i + 1
DS1 = Sheets(1).Cells(i, 1)
DS2 = Sheets(1).Cells(i, 2)
DS = DS1 & vbTab & vbTab & vbTab & vbTab & DS2
ListBox1.AddItem DS
Loop
End Sub
E sada kada se izvsi ucitavanje status podaci su rastrkani po Listbox-u (vidi sliku u prilogu), a zelio bih da budu u jednom stupcu.
Sta bi trebalo napraviti da Status podaci budu u jednom stupcu u Listbox-u?