Werte aus Tabelle in andere Tabelle ohne zu übersc
24.03.2015 01:40:42
Marcel
ich hab da mal ein kleines Problem.
Und zwar würde ich gern aus einer Tabelle Namens Abrechnung die kompletten Werte in eine andere (Archiv)übertragen wollen. Das Problem bei meinem Makro ist das die Werte irgendwie nicht genau da reinkommen wo ich will. Die Zieltabelle ist als Tabelle formatiert damit ich nach Ende eines Quartals oder ähnliches es z.B. nur nach Datum oder so Filtern kann. Geht das Überhaupt?
Dazu sind die zu kopierenden Zellen Tabellenblatt Abrechnung auf A5:N100 und in der Zieltabelle(als Tabelle formatiert) ab A5 beginnend zu kopieren. Dabei darf bei wieder mals kopieren nichts überschrieben werden sondern direkt an die letzten Daten angefügt werden.
Hier mein bisheriges Makro welches mit einer Schaltfläche gestartet wird.
Sub Abrechnung_kopieren()
Sheets("Abrechnung").Range("A5:N100").Copy
Sheets("Archiv").Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).PasteSpecial xlPasteValues
Application.CutCopyMode = False
End Sub
Hier die Datei.
https://www.herber.de/bbs/user/96597.xlsm
Gruß Marcel
Anzeige