Office: (Office 2010) VBA: Korrekte Syntax für Copy Befehl

Hallo und guten Abend,

Ich benutze folgende Syntax in VBA:

Worksheets("Source").Range("M3:M30").Copy_
Destination:=Worksheets("Destination").Cells(2, a)

Ich würde gerne Cells(2, a) durch etwas wie "ActiveCell" ersetzen. Alle meine Versuche sind gescheitert. Kann mir jemand sagen wie die Syntax aussieht?

Ich würde zweitens mit obigem Befehl gerne die Werte (und im Anschluss auch noch die Formate) kopieren und hatte gehofft das so hinzubekommen:

Worksheets("Source").Range("M3:M30").Copy_
Destination:=Worksheets("Destination").Cells(2, a). PasteSpecial Paste:=xlPasteValues


Dort bekomme ich aber beim kompilieren einen Fehler. Hat jemand einen Tipp?


Vielen Dank!

 

Hallo prex99. Bin zwar kein experte aber du könntest ja anstatt .Range... einfach ActiveCell verwenden.

Also ActiveCell.Copy Destination etc....

Bitte denk dran dass bei ActiveCell immer die aktive Zelle anspricht, also darfst du hier die Tabelle oder das Workbook nicht angeben, einfach gleich mit ActiveCell anfangen.

Edit mit Beispiele:

Hier kopierst du die Zelle A1 (Blatt "Source") in die aktive Zelle

Code:

Worksheets("source").Range("A1").Copy Destination:=ActiveCell

Hier kopierst du die aktive Zelle in die Zelle B10 (Blatt "Destination")

Code:

ActiveCell.Copy Destination:=Worksheets("Destination").Range("B10")

Ich empfehle vor dem Worksheets-Befehl auch die Mappe (Workbook) zu definieren. Wenn du mehrere Workbooks offen hast und es nicht definierst, geht Excel immer von der aktiven Mappe aus.

 

das hilft. Vielen Dank