Clever-Excel-Forum

Hallo,

eine allerletzte Hilfe ...

     ReDim Preserve arr(0 To 6, 0 To iRowU) '<-- hier legst du fest, wie groß das Array sein darf ... 0 to 6 ist die Spaltenanzahl

(29.10.2018, 13:40)Flotter Feger schrieb: [ -> ]Hallo,

eine allerletzte Hilfe ...

     ReDim Preserve arr(0 To 6, 0 To iRowU) '<-- hier legst du fest, wie groß das Array sein darf ... 0 to 6 ist die Spaltenanzahl

das habe ich auch so gemacht, ich habe als Bsp von 0 to 7 gemacht

 ReDim Preserve arr(0 To 7, 0 To iRowU)
                    arr(0, iRowU) = .Name
                    arr(1, iRowU) = rng.Address(False, False)
                    arr(2, iRowU) = .Cells(rng.Row, 1)
                    arr(3, iRowU) = .Cells(rng.Row, 2)
                    arr(4, iRowU) = .Cells(rng.Row, 3)
                    arr(5, iRowU) = .Cells(rng.Row, 4)
                    arr(6, iRowU) = .Cells(rng.Row, 5)
                    arr(7, iRowU) = .Cells(rng.Row, 6)
                    iRowU = iRowU + 1

[
Bild bitte so als Datei hochladen: Klick mich!
]

Als Ergebnis wird aber das 7 Feld nicht gefüllt

Bitte hier nochmal unterstützen, wirklich jetzt das Letze mal:).

Vielen Dank

Hallo,

... das allerletzte MAL ...

ColumnCount der ListBox steht noch immer auf 7, vermute ich mal ... .

(29.10.2018, 14:54)Flotter Feger schrieb: [ -> ]Hallo,

... das allerletzte MAL ...

ColumnCount der ListBox steht noch immer auf 7, vermute ich mal ... .

Vielen Dank für deine Geduld ich habe soweit alles rausgefunden.
Wenn du mir jetzt wirklich das aller Letze mal helfen könntest

was muss ich code beim CommandButton3 verändern um nur Bestimmte Zeilen ausgeben und nicht alles?

Hallo,

das wäre jetzt das wievielte ... das dritte allerletzte Mal ?  

Ohne zu wissen, welche Kriterien du ansetzt, um Zeilen auszuschließen ... keine Chance !!!

(30.10.2018, 09:48)Flotter Feger schrieb: [ -> ]Hallo,

das wäre jetzt das wievielte ... das dritte allerletzte Mal ?  

Ohne zu wissen, welche Kriterien du ansetzt, um Zeilen auszuschließen ... keine Chance !

ja ich weiß aber jetzt wirklich , ich möchte nicht alle Zeilen ausgeben sondern z.b 4
Ich habe beim "Range" versucht z.b ("A:C") zu setzen, das geht nicht.

Hallo, :19:

folgendes gibt nur "A:D" aus: :21:

(30.10.2018, 12:08)Case schrieb: [ -> ]Hallo, :19:

folgendes gibt nur "A:D" aus: :21:

Code:

XBlatt.Range(XBlatt.Cells(XZeile, 1), XBlatt.Cells(XZeile, 4)).Copy wks2.Cells(xCounter, 1)

Hallo Case,

danke und wenn ich A,D,Z also nicht in der reinfolge sondern queret, wie wäre dann der code

Hallo, :19:

Du musst nicht jedesmal die Beiträge zitieren. :21:

So wäre es für "A", "C" und "E".




Jetzt kommst Du ins Spiel.

Perfekt, Danke sehr .

Kann mach eigentlich auch die Zeilen immer in eine Tabelle ausgeben, so das man z.B. Kopf und Fußzeile einpflegt.
Dadurch kann ich eine Art Ausgabe schein machen.

Aber es muss nicht sein es wäre nice to have.

Danke an alle für Tolle Hilfe, bester Forum