Çözüldü Sütunda yer alan sayıları çift tık ile tek hücreye üst üste toplama

[sirkülasyon]

Selamün Alryküm
C7 : C258 arasında yer alan sütunda yer alan hücrelere çift click yapıldığında H6 hücresine toplamasını nasıl yapabilirim.

Teşekkür ederim. Saygı ve Hürmetlerimle

 

[Orion1]

Selamün Alryküm
C7 : C258 arasında yer alan sütunda yer alan hücrelere çift click yapıldığında H6 hücresine toplamasını nasıl yapabilirim.

Teşekkür ederim. Saygı ve Hürmetlerimle

Buyurun.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [C7:C258]) Is Nothing Then Exit Sub
Range("h6").Value = Range("H6").Value + Target.Value
End Sub

 

[sirkülasyon]

Evren Abi
Teşekkür ederim Sağolasın

 

[Orion1]

Evren Abi
Teşekkür ederim Sağolasın

Rica ederim.
İyi çalışmalar.