Work Smart

Solusi Bekerja Tanpa Stress

Memilih Non-Contiguous Range

Leave a comment

Memilih Range Non-Contiguous

Memilih range yang non-contiguous (cell-nya tidak bersebelahan)  tdak semudah memilih range yang contiguous. Perhatikan range pada gambar berikut :

Screen Shot 2014-12-27 at 10.09.10 PM

Untuk memilih range A3:A12 yang contiguous, maka Anda bisa memilih cell A3 terlebih dulu kemudian tekan Ctrl+Shift+Down_Arrow (Windows) atau Cmd+Down_Arrow (Mac), maka Anda akan mendapatkan range A3:A12.  Namun kalau cara itu Anda terapkan di Cell B3, maka Anda hanya akan mendapatkan range B3:B6 karena setelah cell B6 cell-cell nya kosong.

Didalam VBA, memilih range yang contiguous seperti pada A3:A12 dapat dilakukan dengan menuliskan code VBA berikut:

Sub pilih_range_contig()
Range(“A3”, Range(“A3”).End(xlDown)).Select
End Sub

Sementara untuk memilih range B3:B12 yang non_contiguous, code di atas perlu di modifikasi sedikit degan menambahkan columns() saja. Columns(1) artinya yang dipilih adalah kolom A, columns(2) artinya yang dipilih adalah kolom B. Dengan demikian codenya menjadi sebagai berikut:

Sub pilih_range_non_contig()
Range(“A3”, Range(“A3”).End(xlDown)).Columns(2).Select
End Sub

Catatan : Columns(i) disini pengertiannya adalah relatif. Columns(1) berarti kolom itu sendiri, columns(2) berarti 1 kolom diseblah kanannya. Bila Anda memiliki range yang horizontal, maka logika yang sama berlaku. Gantikan columns(i) dengan rows(i), Anda akan dapatkan range yang Anda cari. Selamat Mencoba dan Semoga Bermanfaat.

Screen Shot 2014-12-27 at 10.00.13 PM

Hasil pemilihan range contiguous

Screen Shot 2014-12-27 at 10.00.51 PM

Hasil pemilihan range non-contiguous

 

Screen Shot 2014-12-27 at 9.59.33 PM

Hasil pemilihan range non_contiguous kalau dilakukan dengan cara seperti memilih range contiguous

Leave a comment