Tıkladığım satırın en başındaki veriyi istediğim hücreye kopyalama

[bymarduk]

Merhaba,
Makro ile bir şey yapmak istiyorum;

bir satırın herhangi bir hücresine tıkladığımda, 1. sütundaki veriyi istediğim bir hücreye kopyalasın istiyorum.

Örneğin;

Z1 hücresine tıkladığım zaman(ya da Y1, B1, H1.... satırdaki herhangi bir hücreye) , A1 hücresindeki verinin B250 Hücresine kopyalanmasını istiyorum.
Ya da F3 hücresine tıkladığımda F1'deki veriyi B250'ye kopyalasın istiyorum

Nasıl yapabilirim acaba
Teşekkürler.

 

[AdemCan]

Merhaba örnek kod.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count > 1 Then Exit Sub
    Range("B250").Value = Cells(Target.Row, 1)
End Sub

 

[bymarduk]

merhabalar
@AdemCan teşekkürler öncelikle,
makroyu çalıştıramadım ama, direkt kodu yapıştırınca çalıştıramıyorum,
başına Sub Makro1() koydum, diğer kaydettiğim makrolarda böyle olduğu için ama Sub Makro1() satırı hata veriyor bu sefer de.
nasıl çalıştırabilirim acaba
office 2016 kullanıyorum bu arada önemliyse eğer

Sub Makro1()

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Selection.Count > 1 Then Exit Sub
    Range("B22250").Value = Cells(Target.Row, 1)
End Sub

 

[Korhan Ayhan]

office 2016 kullanıyorum bu arada önemliyse eğer

Evet bu bilgi çok önemli..

Rica etsem bu bilgiyi profilinize yazarak güncelleyebilirmisiniz.

Sizin profiliniz boş görünüyor. (Excel Vers. ve Dili -)

 

[bymarduk]

merhaba @Korhan Ayhan
teşekkürler güncelledim dediğiniz gibi.

 

[AdemCan]

2 numaralı mesajdaki kodu, sayfa ismi üzerinde sağ tuş ve kod görüntüleyi tıklayınca açılan sayfaya yapıştırın, daha sonra sayfa üzerinde tıklama ile kopyalama işlemi çalışır.

 

[bymarduk]

@AdemCan harika oldu çok teşekkürler.