Çift tıklama ile aynı satırdaki değeri çağırma

[sehitkamil]

Merhaba,

A1:A30 arasında veriler var. C1:L30 arasında hangi hücreye x yazarsak (ya da mouse çift tıklaması) A sütunundaki aynı satırdaki değeri o hücreye getirebilir miyiz? Yalnız kopyala yapıştır olarak değil, = ile çağırmışız gibi. Örnek dosya ve açıklamam buradadır. Teşekkür ederim.

 

[Orion1]

Dosyanız ektedir.

DOSYAYI INDIR

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Intersect(Target, [C1:L30]) Is Nothing Then Exit Sub
Cancel = True
Target.Value = Cells(Target.Row, "A").Value
End Sub

 

[sehitkamil]

Evren Bey teşekkür ederim. Ama kopyala yapıştır olarak geliyor. A sütunundaki değer değişirse çift tıklama ile çağırdığım da değişsin istiyorum. Mümkün mü acaba?

 

[Orion1]

Kopyala yapıştır yapmadım.Değeri getiriyor.

 

[sehitkamil]

Estağfurullah, anlatamadım.

Değeri getiriyor ama getirdikten sonra getirilen değer değişirse getirdiğiniz değişmiyor.

=A5 ile çağırmış gibi istiyorum ben.

 

[Orion1]

O zaman formül yapın.

 

[sehitkamil]

Peki, çok teşekkür ederim.