WENN-Funktion Makro starten

Function zweimal()
Application. Volatile
End Function

Sub zweimal_Makro()
Range ("C1") .Select
ActiveCell.FormulaR1C1 = "2x jährlich"
Rows ("2:2") .Select
Selection.Insert Shift:=xlDown
End Sub