Hallo Eik,
du verwechselst da was. STRG+C ist fürs Kopieren zuständig. Dabei werden grundsätzlich alle markierten Daten kopiert. Da kann man nix dran ändern. Was davon wieder eingefügt wird, steht auf einem anderen (Tabellen-)Blatt. Ich empfehle dir also eher die Tastenkombination STRG+V für dein Vorhaben.
OnKey ist eine Möglichkeit. Dafür muss man Code an verschiedenen Stellen platzieren. U.a im Workbook_Open Ereignis. Einfacher gehts, wenn du deinem Makro einfach einen Shortcut zuweist. Kopiere dazu die zu kopierenden Daten, aktiviere das Zieltabellenblatt und markiere dort den einzufügenden Bereich. Erst jetzt zeichnest du mit dem Makrorekorder ein neues Makro auf. Wenn du das nur in einer bestimmten Datei machen willst, wählst du "DieseArbeitsmappe" wenn du die Werte jedoch in verschiedenen Dateien einfügen möchtest, dann wählst du Persönliche Arbeitsmappe aus. Im Feld Tastenkombination gibst du ein kleines v ein - STRG ist bereits vorgegeben! - dann drückst du auf OK und wählst über Menü Start - Einfügen - Werte aus. Stoppe nun das Makro und prüfe den Code mit Alt+F11. Dieser muss noch ein bisschen bearbeitet werden, sodass er am Ende inetwa so aussieht:
If ActiveSheet.Name = "Tabelle1" Then
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Else
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
End If
Den Namen deines Arbeitsblattes musst du natürlich anpassen. Anschließend kannst du mit STRG+C kopieren und mit STRG+V je nach Arbeitsblatt mal mit und mal ohne Formatierungen einfügen. Probiers aus :-)
Gruß Mr. K.
|