Excel Makro Zeile einfügen problem

[Klaas91]

Hallo,

ich will via Makro das unten in der Tabelle eine neue Zeileeingefügt wird. Die Formel aus der Zelle darüber soll übernommen werden.
so sieht die Tabelle normal aus... unter A14(Samstag) soll eine neue Zeile rein.

Ich habe das Problem das er die Zeile immer unter A13 einfügt


Hier der Code

Sub Zelle()

    Rows("14:14").Select
    Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
    Range("A13").Select
    
    Selection.AutoFill Destination:=Range("A13:A14"), Type:=xlFillDefault
    Range("A13:A14").Select
    Range("B14").Select
End Sub

wäre froh wenn mir jemand helfen könnte oder einen denk anstoß geben könnte.

mfg

Klaas91

[s_sonnen]

Hi Klaas91.

Willkommen im board, ... auch wenn Du mit Excelproblemen bei uns vielleicht nicht ganz richtig aufgehoben bist.

Verschieb' doch mal Deinen select eine Zeile nach unten, soweit mir bekannt fügt Excel eine Zeile immer oberhalb der selektierten Reihe/Zelle ein.

ciao und 'nen angenehmen Resttag
M.