Tıklanan Hücre Değeri Yazdırma

[baykan_m]

Merhaba Arkadaşlar,

Sayfada herhangi bir satıra tıkladığımda o satırın A1 hücresindeki değerini A2'ye yazmasını istiyorum. Birkaç kod denedim ancak başaramadım. Yardımcı olur musunuz?

İyi çalışmalar

 

[Necdet]

Merhaba,

Sanki açıklamada bir eksiklik var gibi geldi bana, hangi hücreye tıklarsanız tıklayınız siz A1'in değerini A2'ye aktarın diyorsunuz.

Merak ettim doğrusu, neden böyle bir isteğiniz oldu?

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    [A2] = [A1]

End Sub

 

[baykan_m]

Necdet Bey,

Örneğin A sütununda 100 satırlık listem var ve bu listede 17. satırın herhangi bir sütununa (a17,b17,c17 veya diğerleri gibi) tıkladığımda veya yön tuşları ile o hücreye geldiğimde bana otomatik olarak A17 deki değeri yazsın istiyorum.

Umarım anlatabilmişimdir bu sefer. Yardımınız içinde teşekkür ederim Necdet Bey.

 

[baykan_m]

Problemim çözülmüştür. Aşağıdaki kodla çözdüm sonunda

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
b = "b"
x = ActiveCell.Row
hcr = b & x
deger = Sheets("arama").Range(hcr)
Sheets("arama").Range("g16") = deger
End Sub

 

[Necdet]

Merhaba,

Sanırım aşağıdaki gibi bir şey istiyorsunuz.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Not Intersect(Target, [A:A]) Is Nothing Then Exit Sub
    
    ActiveCell.Value = Cells(Target.Row, "A")
    
End Sub

 

[YUSUF44]

Problemim çözülmüştür. Aşağıdaki kodla çözdüm sonunda

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
b = "b"
x = ActiveCell.Row
hcr = b & x
deger = Sheets("arama").Range(hcr)
Sheets("arama").Range("g16") = deger
End Sub

Sorduğunuz soruyla bulduğunuz çözüm bağdaşmıyor. Çözümünüz seçtiğiniz satırın B sütunundaki değeri G16 hücresine aktarıyor. Halbuki seçtiğiniz satırın Ä sütunundaki değerin seçtiğiniz hücreye aktarılmasını istemiştiniz.

 

[Necdet]

Sorduğunuz soruyla bulduğunuz çözüm bağdaşmıyor. Çözümünüz seçtiğiniz satırın B sütunundaki değeri G16 hücresine aktarıyor. Halbuki seçtiğiniz satırın Ä sütunundaki değerin seçtiğiniz hücreye aktarılmasını istemiştiniz.

Zaten Birinci ve ikinci açıklamaları da birbirini tutmuyor.