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.

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert