Bereich von Tabelle 1 in Tabelle 2 kopieren
VBA ermöglicht das Kopieren eines definierten Bereichs aus Tabelle1 in Tabelle2.
Anforderung
Ein Bereich aus der Tabelle1 soll in die Tabelle2 kopiert werden.
Code
Sub Kopieren()
Application.ScreenUpdating = False
Worksheets("Tabelle1").Range("A1:A5").Copy
Worksheets("Tabelle2").Range("B1").PasteSpecial Paste:=xlPasteValues, _
Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Sheets("Tabelle1").Select
Range("A1").Activate
End Sub
- Es wird der Bereich A1:A5 in der Tabelle1 ausgewählt und kopiert.
- Der kopierte Bereich wird in Tabelle2 ab der Zelle B1 eingefügt
- Die Befehle hinter PasteSpecial entfernt die vorhandene Formatierung des kopierten Bereichs A1:A5.
- Der Befehlt nach Paste:= entfernt bedingte Formatierungen.
Gib mir gerne einen Kaffee ☕ aus ❗️
Wenn dir meine Beiträge gefallen und geholfen haben, dann kannst du mir gerne einen Kaffee ☕️ ausgeben.
Follow Me❗️