ich möchte komplette Zeile kopieren und in eine andere Tabelle in eine bestimmte Zeile überschreiben.
Ist das möglich?
Vielen Dank.
Detlef
Sub Unit()
Dim rngQuelle As Range
Dim rngZiel As Range
Set rngQuelle = Worksheets("Tabelle1").Rows(2)
Set rngZiel = Worksheets("Tabelle2").Rows(7)
Call rngQuelle.Copy
Call rngZiel.PasteSpecial(Paste:=xlPasteValues)
Application.CutCopyMode = False
Set rngZiel = Nothing
Set rngQuelle = Nothing
End Sub
Gruß Gerd