Herbers Excel-Forum - das Archiv

Probleme beim laden einer ListBox

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

Betrifft: Probleme beim laden einer ListBox
von: Swen

Geschrieben am: 18.12.2006 19:48:39
Hallo an alle,
kann mir einer sagen wie ich den code ändern muß wenn er erst in der 2 spalte beginnen soll. und eine spalte weniger (die erste) einlesen soll!
Private Sub UserForm_Initialize()
Dim vWerArr         As Variant  ' Array der Zeilen-Nummern
Dim vWerArr2         As Variant  ' Array der Zeilen-Nummern
Dim vInhArr(6, 7) As Variant  ' Array der 6 Zeile an 6 Spalten
Dim vInhArr2(2, 7) As Variant  ' Array der 2 Zeile an 6 Spalten
Dim iZeile          As Integer  ' For/Next Index der Zeilen
Dim iSpalte         As Integer  ' For/Next Index der Spalten
Dim intZeile2 As Integer
Me.Caption = strVergleichsPara & " Summary"
intZeile2 = Zeileermitteln(1)
vWerArr = Array(intZeile2 - 6, intZeile2 - 5, intZeile2 - 4, _
intZeile2 - 3, intZeile2 - 2, intZeile2 - 1)
For iZeile = 0 To 5
For iSpalte = 0 To intRechenoptionCount + 3
If (iZeile = 2 Or iZeile = 3 Or iZeile = 4) And (iSpalte > 1) Then
vInhArr(iZeile, iSpalte) = Format(Cells(vWerArr(iZeile), iSpalte + 1), "0.00")
Else
vInhArr(iZeile, iSpalte) = Cells(vWerArr(iZeile), iSpalte + 1)
End If
Next iSpalte
Next iZeile
ListBox1.List = vInhArr
End Sub

bitte mit kurzer erklärung
gruß
swen
Bild

Betrifft: AW: Probleme beim laden einer ListBox
von: Peter Feustel
Geschrieben am: 18.12.2006 21:31:49
Hallo Swen,
gestern war der Array 'vWerArr' mit festen Werten versehen, heute wird da mit der Variablen 'intZeile2' gerechnet, die aus 'Zeileermitteln(1)' gefüllt wird.
Welcher Wert steht denn in 'intZeile2' ?
Viele Grüße Peter
Bild

Betrifft: AW: Probleme beim laden einer ListBox
von: Swen

Geschrieben am: 18.12.2006 22:53:19
Hallo,
intZeile2 wird der die erste freie Zelle in spalte1 ermittelt,
da die letzen 6 Zeilen eine summery der davor stehenden werte
ist und ich diese in die Listbox laden möcht habe ich diese variabel
gestalltet wie viele werte aber über der summery sind ist unterschiedlich!
in der spalte eins dieser summery sind nun auch noch beschreibungen der
summery wie z.B. Mittelwert,Anzahl,Max. als text drin und ab spalte 2 stehen die
werte zu diesen beschreibungen der einzelnen werte die dadrüber stehen!
gruß
swen
 Bild
Excel-Beispiele zum Thema "Probleme beim laden einer ListBox"
Mehrfachauswahl aus ListBox auslesen Gefilterte Daten in eine ListBox einlesen
Dateien aus Listbox auslesen und öffnen Listbox-Eintrag durch Mausbewegung markieren
ListBox-Einträge auswechseln Horizontal angeordnete Elemente in eine ListBox übernehmen
Tabellenblattnamen in eine ListBox einlesen ListBox bei Eintrag erweitern