Target_Offset ile Cursör Yönlendirme

[baydeniro]

Arkadaşlar Merhaba. Makro yolu ile Excel'de genel özellik değişikliği yapmadan, giriş yapıldıkça cursör'ün şu sıra ile hareket etmesi sağlanabilir mi :

A - B - C - D - alt satır A

 

[Necdet]

Merhaba,

Aşağıdaki kodları Workbook un kod sayfasına kopyalayınız.

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    With Application
        .MoveAfterReturnDirection = xlDown
    End With
End Sub

Private Sub Workbook_Open()
    With Application
        .MoveAfterReturnDirection = xlToRight
    End With
End Sub

Aşağıdaki kodları ise ilgili sayfanın Kod sayfasına kopyalayınız.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [D:D]) Is Nothing Then Exit Sub
Target.Offset(1, -3).Select
End Sub

 

[baydeniro]

Çok Teşekkürler

Sayın Necdet_Yesertener, ilginiz ve yardımınzı için çok teşekkürler. Tam istediğim gibi olmuş. Elinize sağlık. Sağlıcakla kalın.