Aktif hücreyi baz alarak sağa, sola, yukarı ve aşağı doğru seçim yapmaya imkan veren VBA kodu alternatifidir.
Option Explicit
Sub AktifHucredenItibarenSagaDogruSecimYap()
Range(ActiveCell, ActiveCell.End(xlToRight)).Select
End Sub
Sub AktifHucredenItibarenSolaDogruSecimYap()
Range(ActiveCell, ActiveCell.End(xlToLeft)).Select
End Sub
Sub AktifHucredenItibarenYukariDogruSecimYap()
Range(ActiveCell, ActiveCell.End(xlUp)).Select
End Sub
Sub AktifHucredenItibarenAsagiDogruSecimYap()
Range(ActiveCell, ActiveCell.End(xlDown)).Select
End Sub