고수님들 도와 주세요 행을 추가 하는 매크로 버튼을 만들고 싶습니다.

@땜존지존 님  

Sub 매크로2()

Application.ScreenUpdating = False

Set Rng = Cells(Rows.Count, "A").End(xlUp).Offset(-1, 0).EntireRow
Rng.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Rng.Copy Rng.Offset(-1, 0)
ActiveCell.EntireRow.Copy Rng

Application.ScreenUpdating = True

End Sub