Sütunda çift tıklama ile tetikleme

[Tevfik_Kursun]

Merhaba Arkadaşlar,
Ornek dosyada C5 : C14 arasında çift tıklanan hücreni bulunduğu satırdaki E : J arasını örnekte görüldüğü gibi P : V arasına kopyalamak istiyorum. Yardımcı olursanız sevinirim.
Saygılarımla

 

[Tevfik_Kursun]

Merhaba Arkadaşlar,
Çözümledim, teşekkür ederim. Yine de önerilere açığım.
Saygılarımla

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim Son As Long
    Son = Cells(Rows.Count, 17).End(3).Row
    Son = Son + 1
    If Target.Column = 3 Then
        Range("P" & Son) = Son - 1
        Range("Q" & Son) = Cells(Target.Row, 6)
        Range("R" & Son) = Cells(Target.Row, 7)
        Range("S" & Son) = Cells(Target.Row, 8)
        Range("T" & Son) = Cells(Target.Row, 9)
        Range("U" & Son) = Cells(Target.Row, 10)
        Range("V" & Son) = Cells(Target.Row, 5)
    End If
End Sub