Indeks Warna Excel VBA
Seperti dalam lembaran kerja, kita mengubah warna sel atau julat sel tertentu dari tab beranda di VBA. Kami mempunyai fungsi vba yang disebut sebagai Indeks Warna yang digunakan untuk mengubah warna sel atau julat sel yang disediakan, fungsi ini mempunyai pengenalpastian unik untuk berbagai jenis warna.
Di VBA, kami memiliki dua cara menerapkan warna, yang pertama adalah dengan menggunakan sifat "warna" dan yang kedua adalah menggunakan sifat "ColorIndex".
Kami menerapkan warna ke sel sebagai warna latar belakang, kami menerapkan warna font, dan kami menerapkan warna batas. Oleh itu, untuk mengakses warna indeks warna & warna, kita perlu memilih sel terlebih dahulu.
Bagaimana menggunakan Harta Indeks Warna & Warna?
Anda boleh memuat turun Templat Indeks Warna VBA ini di sini - Templat Indeks Warna VBA# 1 - Menggunakan Harta Warna
Andaikan anda mempunyai perkataan "Hello" di sel A1. Kami akan melihat bagaimana menerapkan warna latar belakang sel ini.
Untuk menukar warna latar belakang, dalam sifat warna, kita perlu terlebih dahulu menyebut julat sel.
Kod:
Sub Warna () Julat ("A1") Sub Akhir 
Setelah memilih sel, kita perlu menyebut apakah perkara yang perlu kita lakukan. Seperti yang saya katakan, kita perlu mengubah warna dalaman sel. Jadi untuk mengubah warna latar belakang sel gunakan sifat "Interior".
Kod:
Sub Warna () Julat ("A1"). Sub Akhir Bahagian Dalaman 
Di bawah harta dalaman, kami mempunyai beberapa kaedah dan sifat lain. Oleh kerana kita perlu menukar warna sel gunakan sifat warna.
Kod:
Sub Warna () Julat ("A1"). Interior.Warna = Sub Akhir 
Di sini kita boleh menggunakan 8 warna yang sentiasa dinamakan. Berikut adalah senarai yang sama.
vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhitePilih jenis warna mengikut kehendak anda.
Kod:
Sub Warna () Julat ("A1"). Interior.Warna = vbBlue Akhir Sub 
Sekiranya saya menjalankan kod ini menggunakan kekunci F5 atau secara manual, ia akan mengubah warna latar belakang sel A1 menjadi vbBlue.
Seperti ini, anda boleh menggunakan warna bernama pemalar lain. Cuba gunakannya untuk menguji hasilnya.
Selain daripada 8 warna tetap ini, kita juga dapat mengisi dengan warna yang berbeza juga dengan menggunakan fungsi RGB di VBA.
Kod:
Sub Warna () Julat ("A1"). Interior.Warna = RGB (Sub Akhir 
Kita perlu memasukkan campuran Merah, Hijau, dan Biru dalam jumlah. Untuk menggunakan ini, anda harus betul-betul memasukkan nombor. Saya telah memasukkan campuran sebagai RGB (250, 200, 150).
Kod:
Sub Warna () Julat ("A1"). Interior.Warna = RGB (250, 200, 150) Sub Akhir 
Perubahan warna ini seperti ini.
Masalahnya di sini ialah anda tidak tahu dengan tepat nombor apa yang berwarna.
Kod di bawah adalah untuk menukar warna fon.
Kod:
Sub Warna_Font () Julat ("A1"). Font.Color = RGB (100, 400, 100) Sub Akhir 
Jalankan Kod ini menggunakan kekunci F5 atau secara manual untuk mendapatkan hasilnya.
# 2 - Menggunakan Harta Indeks Warna
Indeks Warna sedikit berbeza dengan sifat warna. Dalam harta WARNA kami menggunakan 8 warna tetap yang diberikan oleh VBA dan juga menggunakan fungsi RGB kami membuat warna kami sendiri.
COLOR INDEX harta terhad di VBA, ia boleh menyimpan nilai dari 1 hingga 56. Setiap nombor dari 1 hingga 56 memegang warna yang berbeza. Berikut adalah nombor senarai dan warna masing-masing.
Berikut adalah kod makro untuk menukar warna latar sel A1 menjadi merah jambu.
Kod:
Sub ColorIndex_Cell () Julat ("A1"). Interior.ColorIndex = 26 Sub Akhir 
Jalankan kod ini secara manual atau gunakan kekunci F5 untuk melihat hasilnya.
Berikut adalah kod makro untuk menukar warna fon sel A1 menjadi kuning.
Kod:
Sub ColorIndex_Font () Julat ("A1"). Font.ColorIndex = 27 Sub Akhir 
Jalankan kod ini menggunakan kekunci F5 atau anda boleh menjalankan secara manual dan melihat hasilnya.
Salah satu perkara penting yang perlu diingat di sini ialah kita dapat memasukkan nombor dari 1 hingga 56. Sekiranya lebih daripada 56 kita akan mendapat ralat "Subscript Out Of Range".
Adakah Anda Memerhatikan?
Seperti yang saya katakan, warna Indeks Warna hanya boleh memasukkan 56 warna tetapi hakikatnya ia hanya boleh memasukkan 46 warna unik dan terdapat 10 warna pendua. Berikut adalah senarai kod warna pendua.
