ich bitte um Hilfe oder um einen guten Tipp:
Ich habe eine Listbox mit drei Spalten, die ich dynamisch mittels VBA fülle.
Dazu verwende ich diesen Code:
frmUserForm.lstDetails.ColumnCount = 3
frmUserForm.lstDetails.Clear
frmUserForm.lstDetails.ColumnWidths = "50Pt;70Pt;70Pt"
For i = 0 To LetzteZeile - 4
If Trim(Cells(3 + i, 1)) & Trim(Cells(3 + i, 2)) & Trim(Cells(3 + i, 9)) = PrüfString Then
frmUserForm.lstDetails.AddItem
frmUserForm.lstDetails.List(j, 0) = Cells(3 + i, 44) 'Txt1 in Spalte 1
frmUserForm.lstDetails.List(j, 1) = Cells(3 + i, 42) 'Txt2 in Spalte 2
frmUserForm.lstDetails.List(j, 2) = Cells(3 + i, 43) 'Txt3 in Spalte 3
Das funktioniert auch alles prima, aber:
Ich möchte - ebenfalls dynamisch - die erste Zeile in der ListBox als Titelzeile definieren und mit einem Beschreibungstext füllen, und da hapert es bei mir bzw. mit meinem Wissen.
Sage ich nur .ColumnHeads = True, erhalte ich wohl eine Titelzeile, aber sie besteht nur aus drei leeren Zellen, in die ich keinen Text schreiben kann.
Ich freue mich über jeden Tipp und bin für jeden Rat dankbar.
...bruno