aanpassen van VBA_code

[DCTALK]

Beste

Ik zou graag de onderstaande vba_code aan willen passen in een variabel.
deze code kopieert een hele regel met formules, en voeg em toe.
alleen dat doet ie dan elke keer op de zelfde plek.

Graag zou ik het zo willen dat de code zowordt; dat als je 'ergens' op een rege staat 121 of regel 20 of 55 dat er daar dan een gekopieerd wordt en in gevoegd wordt

private Sub CommandButton10_Click()
 Rows("27:27").Select
    Selection.Copy
    Rows("26:26").Select
    Selection.Insert Shift:=xlDown
    Range("A26").Select
End Sub

 

[Cobbe]

Test deze eens;

Private Sub CommandButton10_Click()
 Rows(ActiveCell.Row).Copy
  Rows(ActiveCell.Row - 1).Insert Shift:=xlDown
End Sub

 

[DCTALK]

Beste Cobbe

dit werkt !

thksss:thumb: