AW: listbox und felder
10.01.2006 18:21:01
volker
hallo effi,
Private Sub CommandButton1_Click()
ListBox1.Clear
ListBox1.ColumnCount = 2 ' anzahl spalten
ListBox1.ColumnWidths = "1 cm;5 cm" ' breite der spalten
ListBox1.ColumnHeads = True 'spalten überschriften an aus
ListBox1.AddItem 'Lerrzeile hinzufügen
ListBox1.Column(0, 0) = Cells(2, 1) 'hinzugefügte leerzeile füllen /Spalte1
ListBox1.Column(1, 0) = Cells(2, 2) 'hinzugefügte leerzeile füllen / spalte2
ListBox1.AddItem 'usw
ListBox1.Column(0, 1) = Cells(3, 1)
ListBox1.Column(1, 1) = Cells(3, 2)
End Sub
so müßte es gehen also immer additem und dann column
mit dem parameter columnheads stehe ich noch auf kriegsfuß . lt beschreibung übernimmt er den ersten wert einer werteliste oder das erste feld einer tabelle wenn du aber so wie in meinem beispiel die werte manuell einfügen willst habe ich noch keine möglichkeit gefunden.
also wenn du mit additem arbeites kannst du keine spalten überschriften realisieren.
gruß volker.