mit Macro neue Zeile hinzufügen

• mit Macro neue Zeile hinzufügen von Fabienne vom 17.02.2005 12:23:24
• AW: mit Macro neue Zeile hinzufügen - von Marcl am 17.02.2005 12:44:17

Betrifft: mit Macro neue Zeile hinzufügen von: Fabienne
Geschrieben am: 17.02.2005 12:23:24


Hi,

wie kann man mit einem Macro an eine bestehenden Tabelle ganz unten einen neuen Datensatz einfügen?

Ziel:
Ich trage auf Sheet1 Daten ein, klicke dann auf meinen Command-Button, der eben diese Daten in Sheet2 in Tabbellenform abspeichern.

Geht das?

Danke für Eure Hilfe!

Betrifft: AW: mit Macro neue Zeile hinzufügen von: Marcl
Geschrieben am: 17.02.2005 12:44:17

Hallo Fabienne,

wie sieht´s denn aus? In Sheet1 stehen die Daten in einer Zeile nd sollen in Sheet2 in die erste freie Zeile rein?

Sub Makro1()
    Rows(ActiveCell.Row).Copy
    Sheets("Tabelle2").Select
    Range("A1").Select
    Do While ActiveCell <> ""
    ActiveCell.Offset(1, 0).Select
    Loop
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("A1").Select
End Sub

Gruß

Marcl

Beiträge aus den Excel-Beispielen zum Thema "Automatische Berechnung einer Zahlenreihe"