Pada postingan sebelumnya yaitu Contoh Kode Macro Event: Mewarnai Sel Terpilih dalam Excel VBA, Anda membuat pointer sel menyorot terus-menerus pada sel atau barisan sel yang dipilih sehingga membuatnya berwarna merah, kali ini kami akan menjelaskan jenis prosedur event yang hampir sama yaitu SelectionChange namun dilakukan pada objek yang berbeda yaitu workbook untuk membuat agar pointer sel menyoroti sepanjang baris dan kolomnya (dalam contoh warna merah) pada saat sel tersebut diaktifkan atau dipilih.

Gambar di bawah ini mempertunjukkan hasil akhirnya:

Event Workbook_SheetSelectionChange dicetuskan pada saat sel yang berbeda diaktifkan.

Ikuti langkah-langkah berikut untuk membuat kode macronya:

1. Buka Excel dan buat workbook baru.

2. Buka VBE dengan cara menekan Alt+F11, lalu tekan Ctrl+R untuk memastikan jendela Project Explorer membuka.

3. Pada Project Explorer klik folder dengan nama Microsoft Excel Objects.

4. Dalam daftar di bawah Microsoft Excel Objects terdapat objek workbook dengan nama ThisWorkbook. Dobel-klik ThisWorkbook untuk memunculkan module workbook.

5. Pada kotak daftar pilihan Object pilih Workbook.

6. Pada kotak daftar pilihan Procedure pilih SheetSelectionChange.

7. Tepat di bawah Private Sub Workbook_SheetSelectionChange tentukan variabel untuk baris dan kolom dengan jenis data Long:

Dim B As Long, K As Long

8. Jadikan variabel tersebut sebagai sebagai target:

B = Target.Row
K = Target.Column

9. Berikan tugas pada masing-masing variabel untuk menjalankan perintah sebagai berikut:

Sh.Cells.Interior.ColorIndex = 0
Sh.Rows(B).Interior.Color = vbRed
Sh.Columns(K).Interior.Color = vbRed

10. Kode lengkapnya sebagai berikut:

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
ByVal Target As Range)
Dim B As Long, K As Long
B = Target.Row
K = Target.Column
Sh.Cells.Interior.ColorIndex = 0
Sh.Rows(B).Interior.Color = vbRed
Sh.Columns(K).Interior.Color = vbRed
End Sub

11. Kembali ke worksheet dengan cara menekan Alt+Q lalu klik sel mana saja di dalam worksheet untuk mengamati perubahan.

Demikian pembahasan tentang cara membuat agar pointer sel dapat menyoroti sepanjang baris dan sepanjang kolomnya sewaktu sel dipilih atau diaktifkan, semoga postingan ini bermanfaat.