Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zeile automatisch in neues Blatt kopieren

Forumthread: Zeile automatisch in neues Blatt kopieren

Zeile automatisch in neues Blatt kopieren
22.01.2005 12:00:59
opaharry
Ich habe eine Mappe mit meheren Arbeitsblättern.
Wenn ich jetzt in einem Blatt in einer Zeile diverse Daten (Text,Zahlen)
eintrage ,möchte ich das diese Zeile automatisch in ein neues Blatt
in die nächste leere Zeile kopiert wird.
Das soll aber mit allen Blättern möglich sein.
Das neue Blatt soll quasi eine Gesamtliste sein die sich bei jedem Neueintrag
in einem der anderen Blätter aktualisiert.
Mein VBA-Kenntnisse sind recht bescheiden.
Ich hab schon über den Makrorecorder versucht was hinzukriegen ,aber leider klappts nicht so richtig.
Über Anregungen und Vorschläge würde ich mich freuen.
Gruss Opaharry
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zeile automatisch in neues Blatt kopieren
22.01.2005 13:27:20
HerbertH
ein Ansatz:


'ins Tabellenmodul wo du Einträge machst...
Private Sub Worksheet_Change(ByVal Target As Range)
Call zeile_kopieren
End Sub
'in ein Modul
Public Sub zeile_kopieren()
Dim lz%, sh As Worksheet
  Set sh = Worksheets("Tabelle2")
  lz = sh.Cells(Rows.Count, 1).End(xlUp).Row + 1
Rows(ActiveCell.Row).Copy sh.Rows(lz)
End Sub

     gruß Herbert
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige