• Startseite
• Inhalt
• Index

Zellbearbeitung (VBA)

Copy and Paste

Der Inhalt der ersten Zeile wird in die dritte Zeile kopiert.

Sub Copy_and_Paste()

s_Datei = "Musterdatei.xls" Windows(s_Datei).Activate

Rows("1:1").Select Selection.Copy Windows(s_Datei).Activate

Range("A3").Select ActiveSheet.Paste Cells.Select Application.CutCopyMode = False

Range("A3").Select

End Sub

Vor dem Kopieren


Nach dem Kopieren

Spalten

Die gesamte Spalte A wird ausgewählt

Sub Spaltenbearbeitung()

s_Datei = "Musterdatei.xls" Windows(s_Datei).Activate

Columns("A:A").Select

End Sub

Zeilen

Die gesamte erste Zeile wird ausgewählt

Sub Zeilenbearbeitung()

s_Datei = "Musterdatei.xls" Windows(s_Datei).Activate

Rows("1:1").Select

End Sub