Yalnız Mesajı Göster
Eski 09-02-2018, 13:47  
askm
Altın Üye
 
Giriş: 04/06/2005
Şehir: K.Maraş
Mesaj: 2,119
Excel Vers. ve Dili:
2010-2016
Varsayılan

Aşağıdaki kod sayfa1 in A1 hücresine yazılan yazıyı sayfa2 nin A1 hücresine yazar.
Diğer sorunuz anlaşılmadığı için çözüm bulamamıştır bence.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A1]) Is Nothing Then Exit Sub
Sayfa2.Range("A1") = Target.Value
End Sub
__________________
excel 2010- türkçe
askm Çevrimdışı   Alıntı Yaparak Cevapla