Warna Font VBA Excel
Properti VBA Font Color digunakan untuk mengubah warna font sel excel menggunakan kode vba. Kita dapat mengubah warna font dengan berbagai cara menggunakan indeks warna, properti warna dengan fungsi RGB.
Saat saya menyiapkan dasbor di excel, saya biasanya menghabiskan banyak waktu untuk memformat sel, font, dll. Seringkali saya merasa seperti ahli kecantikan yang hebat dengan melihat berbagai warna pemformatan excel. Mengubah warna font di lembar kerja excel adalah pekerjaan yang mudah, tetapi untuk Excel, Anda harus tahu cara menulis kode VBA untuk mengubah warna font.
Untuk mengubah warna font, pertama, kita perlu mengidentifikasi sel apa yang akan kita ubah.
Rentang ("A1: A10")
Kemudian kita perlu memilih properti FONT.
Rentang ("A1: A10"). Font
Lalu apa yang ingin kita lakukan dengan font ini, jadi pilih Color?
Rentang ("A1: A10"). Font.Color
Seperti ini, kita perlu membuat kode untuk mengubah warna font. Kelihatannya sulit, bukan?
Tapi ingat, semuanya tampak sulit di awal, nanti Anda akan menguasainya.
Bagaimana cara Mengubah Warna Font menggunakan VBA?
Contoh # 1 - Menggunakan Indeks Warna
Properti Indeks Warna berbeda dari properti Warna di VBA. Dengan menggunakan nilai numerik, kita dapat mengubah warna sel, font.
Angka berkisar dari 1 hingga 56, dan setiap angka mewakili warna yang berbeda. Di bawah ini adalah daftar nomor dan warnanya.
Oke, mari kita uji ini.
Saya memiliki nilai di sel A1.
Saya ingin mengubah warna font sel A1 menjadi hijau. Di bawah ini adalah kodenya.
Kode:
Sub FontColor_Example1 () Range ("A1") Font.ColorIndex = 10 End Sub
Ini akan mengubah warna font sel A1 menjadi hijau.
Kita juga bisa menggunakan properti CELLS untuk mengubah warna font.
Kode:
Sub FontColor_Example1 () Sel (1, 1) .Font.ColorIndex = 10 End Sub
Seperti ini, kita dapat menggunakan angka dari 1 hingga 56 untuk menerapkan warna yang diinginkan pada font.
Contoh # 2 - Menggunakan Properti Warna
Indeks Warna memiliki warna yang sangat terbatas dari 1 hingga 56, tetapi dengan menggunakan properti COLOR, kita dapat menggunakan 8 warna bawaan vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhite .
Untuk warna-warna ini, kami tidak perlu memberikan angka apa pun. Sebaliknya kita bisa mengaksesnya dengan menggunakan nama mereka seperti yang ditunjukkan di atas. Di bawah ini adalah contoh kode untuk semua 8 warna.
Kode:
Sub vbBlack_Example () Range ("A1"). Font.Color = vbBlack End Sub
Kode:
Sub vbRed_Example () Range ("A1") Font.Color = vbRed End Sub
Kode:
Sub vbGreen_Example () Range ("A1") Font.Color = vbGreen End Sub
Kode:
Sub vbBlue_Example () Range ("A1"). Font.Color = vbBlue End Sub
Kode:
Sub vbYellow_Example () Range ("A1") Font.Color = vbYellow End Sub
Kode:
Sub vbMagenta_Example () Range ("A1"). Font.Color = vbMagenta End Sub
Kode:
Sub vbCyan_Example () Range ("A1"). Font.Color = vbCyan End Sub
Kode:
Sub vbWhite_Example () Range ("A1"). Font.Color = Sub Akhir vbWhite
Contoh # 3 - Menggunakan Properti Warna dengan Fungsi RGB
Seperti yang telah kita lihat, kita hanya memiliki 8 warna bawaan untuk dikerjakan. Tetapi untuk memiliki variasi warna yang luas, kita perlu menggunakan fungsi yang disebut RGB. Selain warna built-in, kita bisa membuat warna kita sendiri dengan menggunakan fungsi VBA RGB.
Lihatlah sintaks fungsi RGB.
RGB (Merah, Hijau, Biru)
RGB adalah singkatan dari "Merah, Hijau, dan Biru". Untuk membuat warna, kita perlu menyediakan angka dari 0 hingga 255 untuk setiap warna.
Di bawah ini adalah beberapa contoh untuk Anda.
Berikut adalah beberapa contoh kode makro
Kode:
Sub RGB_Example () Range ("A1"). Font.Color = RGB (0, 0, 0) 'Ubah warna font menjadi hitam End Sub
Kode:
Sub RGB_Example () Range ("A1"). Font.Color = RGB (16, 185, 199) 'Warna font akan menjadi Sub Akhir ini
Kode:
Sub RGB_Example () Range ("A1"). Font.Color = RGB (106, 15, 19) 'Warna font akan menjadi Sub Akhir ini
Kode:
Sub RGB_Example () Range ("A1"). Font.Color = RGB (216, 55, 19) 'Warna font akan menjadi Sub Akhir ini
