Hücredeki Veriyi Kopyalama

[zorro14]

Merhabalar macroda yeniyim ve bir excelde Sayfa1 a1:a100 satırları arasında ki herhangi bir hücreyi tıkladığımda örneğin a55 hücresini bu hücrenin içindeki değeri kopyalayıp Sayfa2 aktif olacak ve a1 hücresine aktarmasını ( yapıştırmasını) istiyorum. Yardımlarınız için şimdiden teşekkür ederim

 

[YUSUF44]

Aşağıdaki kodları Sayfa1'in sekmesine sağ tıklayıp Kod görünütle dediğinizde açılan sayfaya yapıştırın. Mavi satır Sayfa1'in A1:A100 aralığında tıkladığınız hücredeki değeri Sayfa2'nin a1 hücresine yazar. Kırmızı satır ise Sayfa2'yi açar:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, Range("A1:A100")) Is Nothing Then Exit Sub
[COLOR="Blue"]Sheets("Sayfa2").[a1] = Target
[/COLOR][COLOR="Red"]Sheets("Sayfa2").Activate[/COLOR]
End Sub

 

[zorro14]

Çok teşekkür ederim