Copieers en invoegen rij herhalen op andere sheet

Status
Niet open voor verdere reacties.

dralex

Gebruiker
Lid geworden
21 mrt 2011
Berichten
154
Ik heb in sheet "ftg" een knop en die openend een formuliertje waar je kan aangeven waar en hoeveel rijen je wilt invoegen.
Code:
Private Sub Knop2_Click()
For i = 1 To Formulier_Regels_toevoegen!Hoeveel_regels.Value
Row = Formulier_Regels_toevoegen!Welke_regel.Value 
Rows(Row).EntireRow.Copy
Rows(Row).EntireRow.PasteSpecial xlPasteFormats
ActiveCell.EntireRow.Offset(-1).Insert
Application.CutCopyMode = True
Next i
End Sub

Nu wil ik dat als ik op de knop klik niet alleen voor "ftg" rij invoegd maar ook op de sheet "autotest" met behoud van formules.

Weet iemand hoe dit kan/moet?
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan