Positionierung mehrerer Comboboxen - Abstände?
19.11.2006 19:40:28
Chris
in einem Tabellenblatt werden mehrere Comboboxen erstellt (ein Dankeschön nochmal an das Forum bzw. an Erich G.).
Soweit so gut, klappt hervorragend.
Was mich allerdings irritiert, ist die Positionierung der Comboboxen bzw. ihr Abstand zueinander.
Ich weiß nicht, ob ich es gut genug erklären kann; ich versuche es mal:
Die Comboboxen sollen jeweils in der Mitte einer Zelle (die aus zwei verbundenen Zellen besteht) positioniert werden.
Bei der ersten ComboBox klappt das auch. Mit jeder weiteren Combobox verschieben sich diese jedoch immer weiter nach unten. So hat es zumindest den Anschein.
Aber: Der Abstand zwischen den Comboboxen bleibt gleich (siehe auch Screenshot).
Meine Vermutung ist, dass dieses "Verschieben" mit den Zellen oder der Zeilenhöhe des Tabellenblattes zu tun hat. Bis auf eine Zeile haben alle anderen momentan den Wert "16"; die Anzahl der Zeilen ist zwischen den Comboboxen immer gleich.
Nur was kann ich da tun? Gibt es eine Möglichkeit, die Comboboxen immer mittig zu positionieren? Oder sehe ich den Wald vor lauter Bäumen nicht? Bin ziemlich ratlos.
Hier noch ein Auszug aus dem Code zum Erstellen der Comboboxen:
For intI = 1 To 10
Sheets("Uebersicht").OLEObjects.Add ClassType:="Forms.ComboBox.1", _
Top:=58 + 48 * intI, _
Left:=Range("h7").Left, _
Width:=146, _
Height:=16
...
Die Striche auf dem Screenshot links neben den Comboboxen sind Rahmen der Zellen, die drei vertikalen Striche sind nur zur Kontrolle.
Besten Dank im Voraus,
Chris L