Macro Dengan Perintah Offset

Ditulis Oleh: Dedy E Hutauruk | 22.45 | | 0 komentar »

Perintah Range dan Offset sering sekali digunakan dalam listing program VBA. Fungsi nya adalah untuk menyeleksi, berpindah sel atau pergerakan sel. Dan masih banyak kegunaan lainnya. Dalam bahasan kali ini akan menampilkan contoh perintah yang paling sederhana dari perintah Offset. Kita akan membahas bagaimana cara membuat perintah Macro untuk membuat sel bergerak atau berpindah ke kanan-kiri-atas-bawah


Langkah pertama buka sebuah lembar kerja baru (sheet1), keudian aktifkan sel C5 sebagai titik acuan dengan cara meng klik di sel tersebut

Buka jendela VBE lalu insert sebuah modul, kemudian ketik kode berikut

Sub Kiri()
ActiveCell.Offset(0, -1).Select
End Sub

Sekarang jalankan Macro Kiri, maka sel aktif akan berpindah ke kiri satu sel. Sel B5 aktif

Selanjutnya ketik kode berikut untuk pergerakan sel ke kanan, atas dan bawah

Sub Kanan()
ActiveCell.Offset(0, 1).Select
End Sub

Sub Atas()
ActiveCell.Offset(-1, 0).Select
End Sub

Sub Bawah()
ActiveCell.Offset(1, 0).Select
End Sub

Sebagai rangkumannya bisa dilihat pada gambar berikut ini

Untuk lebih memahami coba anda ganti angka 1 menjadi angka 2,3 ,4 .Apa yang terjadi??

0 komentar