Hallo,

ich habe folgendes Problem. Ich möchte eine Union von Ranges einer Variable zuordnen. Ich schreibe:

Public Arry As Variant

...

Arry = .Range("A" & iRow & ":B" & iRow & ", " & _
            "D" & iRow & ":F" & iRow & ", " & _
            "I" & iRow & ", " & _
            "N" & iRow & ":Q" & iRow & ", " & _
            "S" & iRow & ":U" & iRow).Value

und dann, im nächsten Loop:

.Range("A" & iRow - 1 & ":B" & iRow - 1 & ", " & _
            "D" & iRow - 1 & ":F" & iRow - 1 & ", " & _
            "I" & iRow - 1 & ", " & _
            "N" & iRow - 1 & ":Q" & iRow - 1 & ", " & _
            "S" & iRow - 1 & ":U" & iRow - 1) = Arry

Aber komischerweise schreibt das Makro in die Zeile nur den ersten Range, [A iRow : B iRow]  und dann, in allen anderen Zellen, immer die Zelle "A iRow".

Mit einem einzigen Range funktioniert es gut, das heisst, wenn ich schreibe:

Arry = Range(Cells(iRow, 1), Cells(iRow, 16)).Value

und dann, im nächsten Loop,

Sheets("Zusammenfassung").Range(Cells(iRow - 1, 1), Cells(iRow - 1, 16)) = Arry

Könnte mir jemand helfen??

Vielen Dank!!!!!!!

Jacopo