Speciale herhalings code middels VBA in excel 2010

[Bus1984]

Beste,

IK ben geen expert in VBA codes, maar zou toch graag hier meer mee willen werken. Ik hoop dat iemand mij met het volgende kan helpen:

Ik zou graag willen dat als ik in C3 '1' invoer (D3 = Alive), de regels 2 t/m 6 zich herhalen. Als dit zich herhaalt heeft zou ik daarna graag willen dat als C8 '1' is (D8 = Alive), dat dan wederom regels 2 t/m 6 (of 7 t/m 11) zich herhalen, enz.

Ik hoop dat iemand een oplossing heeft! Alvast dank voor de genomen moeite.

Groeten Heleen

 

[OctaFish]

Leg eens uit wat de bedoeling is, want 'regels herhalen'? Bedoel je een kopie maken van rijen 2 t/m6? En waar moeten die rijen dan komen?

 

[Bus1984]

Bedankt voor je reactie. Ik bedoel inderdaad een kopie van de rijen 2 t/m 6 welkdan dan direct eronder mogen komen.

 

[HSV]

In moduleblad sheet1.

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Select Case Right(Target.Row, 1)
 Case 3, 8
    If Target.Value = 1 Then
     Range("A2").Resize(5, 9).Copy Cells(Rows.Count, 2).End(xlUp).Offset(1, -1)
     Cells(Target.Row + 5, 3).ClearContents
    End If
  End Select
  Application.EnableEvents = True
End Sub

 

[Bus1984]

FANTASTISCH!!! Dit is precies wat ik bedoel! Enorm bedankt!