Excel: Schaltfläche pro Zeile zum Kopieren und Einfügen versteckter Zeilen - Excel, VBA

Ich möchte ein Blatt mit mehreren Zeilen haben, jedes mit einem "+" Knopf. Wenn Sie auf die Schaltfläche klicken, wird eine verborgene "Vorlagen" -Zeile kopiert und unterhalb der Zeile der Schaltfläche eingefügt.

Antworten:

1 für die Antwort № 1

Angenommen, die verborgene Zeile ist Zeile 2 und Sie benötigen nur eine einzelne Schaltfläche, die Zeile 2 in die Zeile unter der aktiven Zelle kopiert:

    Sub CopyRow
Rows("2:2").Copy Destination:=Cells(ActiveCell.Row + 1, 1)
End sub

Speisekarte