Navigasi Cell dalam macro excel VBA

Mungkin sudah banyak yang tau ini, ini mengingatkan lagi kalau lupa tinggal baca lagi secara ringkas :

Menuju ke alamat cell spesial paling awal/atas dan ujung bawah/terakhir sheet
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select

Menuju ke alamat cell paling ujung bawah/terakhir sheet
shortcut (ctrl+end)
macronya :
ActiveCell.SpecialCells(xlLastCell).Select

Menuju ke alamat cell paling atas, bawah, kiri, kanan
shortcut (ctrl+up),(ctrl+down),(ctrl+left),(ctrl+right)
macronya :

Selection.End(xlUp).Select
Selection.End(xlDown).Select
Selection.End(xlToLeft).Select
Selection.End(xlToRight).Select

Bedakan dengan rumus diatas (antara ke dan blok sampai):



Dari tempat cell berada sekarang diblok sampai ke alamat cell paling atas, bawah, kiri, kanan
shortcut (ctrl+shift+up),(ctrl+shift+down),(ctrl+shift+left),(ctrl+shift+right)
macronya :

Range(Selection, Selection.End(xlUp)).Select
Range(Selection, Selection.End(xlDown)).Select
Range(Selection, Selection.End(xlToLeft)).Select
Range(Selection, Selection.End(xlToRight)).Select


atau pakai cara langsung
SendKeys ("^{HOME}") '//Ctrl-Home
SendKeys ("{UP}") '//Up Arrow
SendKeys ("{DOWN}") '//Down Arrow
SendKeys ("{LEFT}") '//Left Arrow
SendKeys ("{RIGHT}") '//Right Arrow

Lanjutkan ke Navigasi Cell dalam macro excel VBA (bagian 2)
contoh makro navigasi cell 2