aktarma ve sayfa onizleme getiren macro

[unreal_avci]

sorunu dosyanin icinde anlattim.

degisiklik yapilan satira karsilik gelen b satirinda bulunan hucredeki veriyi diger sayfaya aktarilip onizlemesini getirmek istiyorum.

tesekkur ederim.

 

[N.Ziya Hiçdurmaz]

yanıt

Sayfa1'in kod bölümüne yazınız.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [c10:c15]) Is Nothing Then Exit Sub
    If Target <> "" Then
        Sayfa2.[f12] = Sayfa1.Cells(Target.Row, "b")
    End If
    Sayfa2.Activate
    ActiveWindow.View = xlPageBreakPreview
End Sub

 

[unreal_avci]

Sayin N.Ziya Hiçdurmaz cok tesekkur ederim.