[Løst] Copy Row, insert on Active cell Excel VBA

[9ls1]

Hei, jeg klarte og få dette til i helga, men nå var alt borte.

 

Kan noen hjelpe meg med kode for macro:

 

Kopiere rad 5 og 6

 

Lim inn over activ celle, (behold formatering)

 

akkurat som Copy paste row

[9ls1]

Private Sub CommandButton1_Click()

EntireRow = Range("5:6").Copy

ActiveCell.EntireRow.Insert

End Sub