Dieses sehr einfache Makro kopiert eine Zeile aus einem Blatt und fügt sie in ein anderes ein.Sub Eine_Zeile_Einfuegen() 'Zeile kopieren und einfügen Sheets("Tabelle1").Range("1:1").Copy Sheets("Tabelle2").Range("1:1") Application.CutCopyMode = False End Sub...