Auswahl aufheben nach Makro
11.07.2017 16:48:40
Kisska
mit folgendem Makro kopiere ich Daten aus einem Tabellenblatt ins andere.
Nach der Makroausführung erscheint die Tabelle 2 im Blatt als markiert und die Tabelle 1 im Blatt 1 als markiert (wie ein Schatten) und zusätzlich ausgewählt (beweglicher gestrichelter Rahmen).
Wie muss folgender Code geändert werden, damit beide Tabellen nicht als markiert bzw. ausgewählt erscheinen?
Sub Kopieren()
Sheets("Blatt_1").Select
Range("Tabelle1").Select
Selection.Copy
Sheets("Blatt_2").Select
Range("Tabelle2[Spalte1]").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Viele Grüße
Kisska