Macro to insert row and copy down formulas

[Cammandk]

My worksheet has no visible row no for user presentation.
I want to place the cursor in first column (A) and at that row insert a new row from A to W and copy down all the formulas/formatting and conditional formats. Need to attack a ctrl key L to run it. This macro only to work in Cost manager sheet.

 

[Warship]

Sub InsertCopyDn()
    If ActiveSheet.Name = "Cost Manager" _
            And Selection.Column = 1 _
            And Selection.Areas.Count = 1 Then
        Selection.Resize(1, 23).Select
        Selection.Insert , CopyOrigin:=xlFormatFromLeftOrAbove
        Selection.Offset(-1, 0).Copy Selection
    End If
    Application.MacroOptions Macro:="InsertCopyDn", ShortcutKey:="L"
End Sub