Cara Membuat Tanda Warna Cell Dengan VBA di Excel

Bagaimana cara membuat tanda warna cell dengan VBA? Pada dasarnya kesaktian Microsoft Excel yang satu ini bekerja pada halaman Visual Basic of Application (VBA) di Excel, dengan menggunakan code VBA dapat membuat highlight atau tanda warna pada cell. Misalnya tanda warna ini bisa kita masukan pada lembar kerja Excel yang fungsinya untuk menandai baris dan kolom dengan warna secara otomatis

Buka execel
buka developer
kli Visual basic
pada microsof excel objek klik kanan sheet1
muncul jendela VBA

salin script dibawah ini

jalankan

untuk mengganti warna ganti angka 37 sesuai dengan warna keinginan anda


Script / Kode :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rowNumberValue As Integer, columnNumberValue As Integer, i As Integer, j As Integer
Cells.Interior.ColorIndex = 0
rowNumberValue = ActiveCell.Row
columnNumberValue = ActiveCell.Column
For i = 1 To rowNumberValue
Cells(i, columnNumberValue).Interior.ColorIndex = 37
Next i
For j = 1 To columnNumberValue
Cells(rowNumberValue, j).Interior.ColorIndex = 37
Next j
End Sub

1 = hitam
2 = putih
3 = merah
4 = Hijau
5 = Biru
6 = Kuning
7 = Pink
8 = Hijau light
9 = Coklat
15 = Abu-abu

Baca Juga