Geht das besser?
08.12.2003 18:02:22
Frank
kann man dieses Makro besser machen?
Danke im voraus. Frank
Selection.Copy
Sheets("Tabelle2").Select
Range("A6").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Sheets("Tabelle1").Select
ActiveCell.Offset(0, 1).Select
Selection.Copy
Sheets("Tabelle2").Select
Range("B4").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Sheets("Tabelle1").Select
ActiveCell.Offset(0, 1).Select
Selection.Copy
Sheets("Tabelle2").Select
Range("C6").Select
ActiveSheet.Paste
Application.CutCopyMode = False