versuchs mal damit. Man muß nicht das Blatt aktivieren um die Zeile dort zu kopieren. Das macht man als Mensch, weil man das sehen muß zum draufklicken. VBA brauch das nicht. Ich habe hier als Einfügemarke Spalte A der aktiven zelle verwendet. ich gehe davon aus das du diese Zeile einfügen willst, um sie anschliessend zu bearbeiten.
Sub
LineIn()
Application.ScreenUpdating =
False
TabellenschutzAus
Sheets(Ex).Range(
"A1:P1"
).Copy Sheets(
"E&T List"
).Cells(ActiveCell.Row, 1)
TabellenschutzEin
Application.ScreenUpdating =
True
End
Sub