Probleme mit "cells"
KlausF
ich habe folgenden Code:
Windows(BAB).Activate
Sheets("MER_GK").Range("E79:E80").Copy
Windows(BD).Activate
Cells(1818, S).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlAdd, SkipBlanks:= _
False, Transpose:=False
den ich noch weiter vereinfachen möchte (Activate, Selection raus).
Mein Versuch dazu:
Workbooks(BAB).Sheets("MER_GK").Range("E79:E80").Copy
Workbooks(BD).Sheets("Ist").Cells(1818, S).PasteSpecial Paste:=xlValues, Operation:=xlAdd, _
SkipBlanks:=False, Transpose:=False
wird in der zweiten Zeile nicht akzeptiert.
(das Ziel muss bezüglich der Spalte variabel sein! - also Range geht hier nicht)
Was ist daran falsch?
Mein Suchen im Archiv hat mir auch nichts gebracht.
Ich hoffe stark auf Euch!
Gruß!
Klaus