I'm working in VBA and have a particularly long code that duplicates many times. I know this question has been posted on here before, and my best guess from reading previous threads is that I need to divide my code into several procedures. However, I've tried using several examples and haven't been able to figure it out. Below is just a small section of my code- it runs over 100 rows, so it definitely exceeds the max size. Would anyone have any suggestions as to how I can break this up? Thanks so much.

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, Range("C24")) Is Nothing Then
    Sheet2.Range("C24") = Target
End If
If Not Intersect(Target, Range("D24")) Is Nothing Then
    Sheet2.Range("D24") = Target
End If
If Not Intersect(Target, Range("E24")) Is Nothing Then
    Sheet2.Range("E24") = Target
End If
If Not Intersect(Target, Range("F24")) Is Nothing Then
    Sheet2.Range("F24") = Target
End If
If Not Intersect(Target, Range("C25")) Is Nothing Then
    Sheet2.Range("C25") = Target
End If
If Not Intersect(Target, Range("D25")) Is Nothing Then
    Sheet2.Range("D25") = Target
End If
If Not Intersect(Target, Range("E25")) Is Nothing Then
    Sheet2.Range("E25") = Target
End If
If Not Intersect(Target, Range("F25")) Is Nothing Then
    Sheet2.Range("F25") = Target
End If
End Sub