Zeile duplizieren und untere Zeile aktivieren

Bild

Betrifft: Zeile duplizieren und untere Zeile aktivieren von: Hoffi
Geschrieben am: 23.02.2005 09:49:06

Hallo Ihr,

um eine vorhandene Zeile zu duplizieren, habe ich folgendes Makro aufgenommen:

Sub ZeileDuplizieren()
    ActiveCell.Rows.Select
    Selection.Copy
    Selection.Insert Shift:=xlDown
    Application.CutCopyMode = False
End Sub


Nun möchte ich noch den Curser in die untere (neue) Zeile setzen lassen (eigentlich nur Taste Pfeil-Abwärts) aber ich bringe es nicht hin. Kann doch nicht schwer sein, wer kann mir helfen???

Danke!
Hoffi
Bild


Betrifft: AW: Zeile duplizieren und untere Zeile aktivieren von: RainerK
Geschrieben am: 23.02.2005 10:26:44

Hi,

probier mal so:
Sub ZeileDuplizieren()
    ActiveCell.Rows.Select
    Selection.Copy
    Selection.Insert Shift:=xlDown
    Application.CutCopyMode = False
    ActiveCell.Offset(1, 0).Select
End Sub


MfG Rainer

PS: Rückantwort nicht vergessen


Bild


Betrifft: AW: Zeile duplizieren und untere Zeile aktivieren von: Hoffi
Geschrieben am: 23.02.2005 11:31:03

Super, vielen herzlichen Dank!

Rückantwort bezog sich auf dieses Forum, oder muss ich bei dem Makro irgendeine Rückantwort einbauen???


Bild


Betrifft: AW: Zeile duplizieren und untere Zeile aktivieren von: RainerK
Geschrieben am: 23.02.2005 12:06:27

Rückantwort bezieht sich nur aufs Forum. Viele vergessen diese und der Beantworter weiß nie, ob die Lösung geklappt hat.

MfG Rainer


 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zeile duplizieren und untere Zeile aktivieren"