hücreye veri girildiğinde aynı veriyi başka sayfadaki hücreye yazdırma

[Schuba]

değerli hocalarım şöyle bir makroya ihtiyacım var

sayfa1 in B2 hücresine veri girdiğim zaman otomatik olarak
sayfa 2 açılsın ve sayfa2 nin C6 hücresine aynı veri yazılsın isiyorum

yardımlarınız için şimdiden teşekkürler

 

[Ömer]

Merhaba,

Sayfa1'in kod bölümüne yazarak deneyiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, [B2]) Is Nothing Then Exit Sub
    Sheets("Sayfa2").[C6] = Target
    Sheets("Sayfa2").Select
End Sub

 

[Schuba]

hocam çok teşekkür ederim fakat küçük bir hata yapmışım yani yanlış anlatmışım tam olarak aşağıdaki gibi olacak düzeltirseniz sevinirim

sayfa1 in B2 hücresine veri girdiğim zaman otomatik olarak
sayfa 2 açılsın ve sayfa1 in "B4" hücresindeki veri
sayfa 2 nin C6 hücresine yazılsın

 

[Ömer]

Sheets("Sayfa2").[C6] = Target

Yerine;

Sheets("Sayfa2").[C6] = [B4]

yazarak deneyiniz.

 

[Schuba]

çok teşekkür ederim hocam