Yeah, einfach aber genial! Danke
Bei den Daten, die ich mir rausziehe, handelt es sich um Bestellungen, die logischerweise immer mehr werden. Kann man das irgendwie hinkriegen, dass er sich automatisch, sobald es neue Bestellungen gibt, er sich die rauszieht?
Bin hier gerade an nem Makro dran. Wieso funktioniert das nicht?
Code: Alles auswählen
Sub KopiereBereich()
Dim Quelltab As Worksheet
Dim Zieltab As Worksheet
Dim Zelle As Range
Dim Zaehler As Long
Zaehler = 1
Bereich = "A1:A10"
Set Quelltab = ActiveWorkbook.Worksheets("Tabelle1")
Set Zieltab = ActiveWorkbook.Worksheets("Tabelle6")
For Each Zelle In Quelltab.Range("A1:A10")
Zieltab.Cells(Zaehler, 1) = Zelle
Zaehler = Zaehler + 1
Next Zelle
End Sub