Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Makro: Zeile kopieren





Frage

Hallo Zusammen, Mein Problem: In einer Tabelle soll durch eine Tastenkombination (wie bei einem aufgezeichnten Makro) eine vorher definierte Zeile (inkl. der Formeln und Formate) hinzugfügt werden können. Dadurch kann der Anwender selbstständig die Tabelle erweitern, ohne die benötigten Formeln und Formate von Hand einzugeben bzw. zu kopieren. Danke schon mal im voraus für die Hilfe. Gruss 10Deluxe

Antwort 1 von nighty

hi all :)

kopiert vom aktiven sheet die letzte beschriebene zeile
und haengt diese ran

gruss nighty


Sub ZeileEinfuegen()
ActiveSheet.Rows(ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row).Copy _
ActiveSheet.Rows(ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row + 1)
End Sub