Listbox Problem

[uwe001]

Hallo zusammen

habe ein kleines Problem mit dem Füllen der Listbox und Weiterverarbeitung der Daten.

6 der 8 Spalten (evlt. auch noch weitere Spalten geplant) des Datenblattes werden angezeigt. Möchte aber alle anzeigen lassen und dann durch doppelclick die Textfelder befüllen.

Habe ein Beispieldatei beigefügt.
Vielleicht kann mir jemand weiterhelfen.


  test001.xlsm (Größe: 46,98 KB / Downloads: 9)

Gruss Uwe

[atilla]

Hallo Uwe,
such im Code hinter der Userform nach folgender Zeile:

For j = 0 To 5

und änder' die 5 in 6

[uwe001]

Vielen Dank.
Funktioniert super.

Gruß Uwe

[snb]

Du solltest:

Code:

    With Me.ListBox1

      .Font.Size = 10
      .ForeColor = RGB(0, 0, 255)
      .ColumnCount = 8
      .ColumnWidths = "2 cm;2 cm;2 cm;2 cm;2 cm;2 cm;2 cm;2 cm;"
    End With

im Designmode als Eigenschaften der Listbox eingetragen haben.
Und weiteres in angehängter Datei