Leerzeile automatisch einfügen

Forumthread: Leerzeile automatisch einfügen
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Leerzeile automatisch einfügen

01.11.2004 12:47:00

Martin

Hallo
Ich habe folgendes Problem:
Titelzeile (Zeile 10, Spalten A - F)
Leerzeile zur Eingabe (Zeile 11, Spalten A - F)
Totalzeile (Zeile 12, Spalten A - F)
Ich möchte jetzt, dass wenn in der Leerzeile etwas eigegeben wird, dass unterhalb eine neue Leerzeile automatisch einfügt wird und die Totalzeile eins runterrutscht. Wenn dann etwas in der neuen Leerzeile einfügt wird, soll wieder automatisch eine weitere Leerzeile automatisch eingefügt werden und die Totalzeile wieder eins runterrutschen.
Besten Dank für die Hilfe
Martin

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Leerzeile automatisch einfügen

ChrisL

AW: Leerzeile automatisch einfügen

ChrisL

Hi Martin


Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = Range("A65536").End(xlUp).Row - 1 Then Rows(Range("A65536").End(xlUp).Row).Insert
End Sub

Oder nimm gleich Access.
Gruss
Chris