Hallo,
ich habe hier gerade mal wieder die leichte Nervenkrise bekommen, weil ich fast an einem Problem mit Range und Cells gescheitert bin.
'1. Tut mir Leid, das geht nicht
wsQuelle.Range(wsQuelle.Cells(1, 1), wsQuelle.Cells(lngLastRowQ, 10)).Copy
wsZiel.Range(Cells((lngLastRowZ + 1), 1)).PasteSpecial (xlPasteValues)
'2. und das auch nicht
wsQuelle.Range(wsQuelle.Cells(1, 1), wsQuelle.Cells(lngLastRowQ, 10)).Copy
wsZiel.Range(wsziel.Cells((lngLastRowZ + 1), 1)).PasteSpecial (xlPasteValues)
'3. aber das schon
wsQuelle.Range(wsQuelle.Cells(1, 1), wsQuelle.Cells(lngLastRowQ, 10)).Copy
wsZiel.Range(Cells("A" & (lngLastRowZ + 1))).PasteSpecial (xlPasteValues)
Wieso kann ich verd... nochmal nicht mit der ersten Version arbeiten. Erscheint mir logisch, ist es aber wohl nicht, weil ein Objektwechsel stattfindet.
Warum muss ich plötzlich auf die A1 Schreibweise wechseln und gibt es hiezu keine Alternative?
Genervt, aber mit trotzdem freundlichen Grüßen
Peter