Herbers Excel-Forum - das Archiv

Ausrichtung im Listenfeld

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
ListBox
Bild

Betrifft: Ausrichtung im Listenfeld
von: GSKE

Geschrieben am: 03.01.2007 21:45:11
Moin, moin
folgendes Problem plagt mich.
Im Listenfeld würde ich gern die Felder ausrichten, was fehlt da noch ?!
For InI = 2 To 119
If Worksheets("Akku-Daten").Cells(InI, 1) (??) "" Then
If Worksheets("Akku-Daten").Cells(InI, 19) (?) 0 Then
ListBox1.AddItem .Range("A" & InI)
ListBox1.List(InZeile, 0) = Worksheets("AKKU-Daten").Range("A" & InI)
ListBox1.List(InZeile, 1) = Worksheets("AKKU-Daten").Range("C" & InI)
ListBox1.List(InZeile, 2) = Worksheets("AKKU-Daten").Range("N" & InI)
ListBox1.List(InZeile, 3) = Format(Worksheets("AKKU-Daten").Range("O" & InI), "#0 g")
ListBox1.List(InZeile, 4) = Format(Worksheets("AKKU-Daten").Range("P" & InI), "#0 A")
ListBox1.List(InZeile, 5) = Format(Worksheets("AKKU-Daten").Range("Q" & InI), "#0 mAh")
ListBox1.List(InZeile, 6) = Format(Worksheets("AKKU-Daten").Range("R" & InI), "h:mm:ss;@")
ListBox1.List(InZeile, 7) = Format(Worksheets("AKKU-Daten").Range("S" & InI), "#,##0.00 €")
InZeile = InZeile + 1
End If
End If
Next InI
End With
Bild

Betrifft: AW: Ausrichtung im Listenfeld
von: Jochen
Geschrieben am: 03.01.2007 22:09:17
Hi,
nur eine Ausrichtung möglich, kannst du in den Eigenschaften unter
TextAlign einstellen.
mfg Jochen
Bild

Betrifft: AW: Ausrichtung im Listenfeld
von: GSKE

Geschrieben am: 05.01.2007 15:43:44
Danke für die schnelle Antwort, habe selber eine Lösung gefunden.
Wohl eher ne Krücke, aber es funktioniert!
Alle Felder nach "Right" ausrichten und die gewünschten "Center" oder "Left" Felder,
einfach mit Leerstellen auffüllen.
M.f.G. Günter
 Bild
Excel-Beispiele zum Thema "Ausrichtung im Listenfeld"
Tabellenblattnamen in ein Listenfeld einlesen Abfrage der Auswahl aus einem Gültigkeits-Listenfeld