Überschrift in Liste einer Combobox

Bild

Betrifft: Überschrift in Liste einer Combobox
von: Wolfgang
Geschrieben am: 22.08.2015 15:57:28

Hallo alle gemeinsam, ich hab eine dreispaltige Combobox. Die Liste fülle ich mit diesen Skript:
With Worksheets("Stammdaten")
Dateneingabe.ComboBox1.List = .Range(.Cells(5, 10), .Cells(.Cells(.Rows.count, 10).End(xlUp).Row, 12)).Value
End with
Nun hat die Liste eine Überschriftenzeile. Ich habe aber leider keine Möglichkeit gefunden, ob überhaupt oder wie diese ausgefüllt wird.
In der Zeile 4 in „Stammdaten“ stehen natürlich Überschriften.
Es wäre schön, wenn mir jemand auf die Sprünge helfen könnte.
Danke im Voraus
Wolfgang
Aus dem Erzgebirge

Bild

Betrifft: AW: Überschrift in Liste einer Combobox
von: Daniel
Geschrieben am: 22.08.2015 16:12:15
Hi
die Möglichkeit, in der Liste eine Überschrift anzeigen zu lassen besteht nur dann, wenn du die Liste über die Eigenschaft RowSource/ListFillRange direkt mit einer Tabelle auf einem Excelblatt befüllst.
(RowSource: Useform-Combobox, ListfillRange: Combobox auf Tabellenblatt)
dh du musst dann in diese Eigenschaft die Zelladresse des Bereichs eingeben (mit Tabellenblatt):
und die Eigenschaft "ColumnHeads" = True setzen (entweder direkt im Editor oder auch per Code

Dateneingabe.ComboBox1.rowSource = "'" & .Name & "'!" & .Range(.Cells(5, 10), .Cells(.Cells(.Rows.count, 10).End(xlUp).Row, 12)).Address
Dateneingabe.Combobox1.Columnheads = true

als Überschriftenzeile wird dann die Tabellenzeile verwendet, die sich direkt über dem angebenen Bereich befindet (dh du darfst die Übberschrift nicht mit einschliessen)
wenn du eine andere Befüllmethode verwendest, kannst du keine Überschriftenzeile anwenden.
Gruss Daniel

Bild

Betrifft: AW: Überschrift in Liste einer Combobox
von: Wolfgang
Geschrieben am: 22.08.2015 16:30:12
Hallo Daniel,
Kannst Du den Teil …= "'" & .Name & "'!" & … für mich etwas erklären?
Wolfgang
Aus dem Erzgebirge

Bild

Betrifft: AW: Überschrift in Liste einer Combobox
von: Daniel
Geschrieben am: 22.08.2015 16:39:27
Hi
das ergibt eine Zelladresse mit Tabellenblattname davor.
so wie wenn du in einer Zelle eine Formel mit einem Zellbezug auf ein anderes Tabellenblatt hast:
Tabellenbattname - Ausrufezeichen - Zelldadresse
die Hochkommas um den Blattnamen sind erforderlich, wenn der Blattname ein Sonderzeichen enthält, und dazu gehört schon das einfache Leerzeichen.
In Excel wird das Hochkomma automatisch eingefügt und wieder entfernt, wenn es nicht benötigt wird (kannst du ja mal ausprobieren, indem du ein Blatt von "Tabelle1" in "Tabelle 1" umbenennst)
in VBA muss man sich selber drum kümmern.
da das Hochkomma nicht schadet, wenn es nicht benötigt wird, setze ich es immer mit.
Gruss Daniel

Bild

Betrifft: AW: Überschrift in Liste einer Combobox
von: Wolfgang
Geschrieben am: 22.08.2015 16:54:53
Hallo Daniel,
Danke, für die Hilfe. Hab es so verwendet und es ist alles in Ordnung.
Wolfgang
Aus dem Erzgebirge

Bild

Betrifft: AW: Überschrift in Liste einer Combobox
von: Hajo_Zi
Geschrieben am: 22.08.2015 16:13:27
Hallo Wolfgang,
setze die Eigenschaft ColumnHeads auf True.


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Überschrift in Liste einer Combobox"