Warna Font Excel VBA
VBA Font Warna harta digunakan untuk menukar warna fon sel excel menggunakan kod VBA. Kita dapat mengubah warna fon dengan pelbagai cara menggunakan indeks warna, warna properti dengan fungsi RGB.
Semasa saya menyediakan papan pemuka di excel, saya biasanya menghabiskan banyak masa untuk memformat sel, fon, dan lain-lain. Sering kali saya merasa seperti jurusolek cemerlang dengan melihat pelbagai warna pemformatan excel. Mengubah warna fon di lembar kerja excel adalah kerja yang mudah, tetapi ketika datang ke Excel, anda harus mengetahui cara-cara menulis kod VBA untuk mengubah warna fon.
Untuk menukar warna fon, pertama, kita perlu mengenal pasti sel apa yang akan kita ubah.
Julat ("A1: A10")
Maka kita perlu memilih harta FONT.
Julat ("A1: A10"). Fon
Lalu apa yang ingin kita lakukan dengan fon ini, jadi pilih Warna?
Julat ("A1: A10"). Warna fon
Seperti ini, kita perlu membina kod untuk menukar warna fon. Ia kelihatan sukar, bukan?
Tetapi ingat, semuanya nampaknya sukar pada awalnya, nanti anda akan berjaya.
Bagaimana Menukar Warna Font menggunakan VBA?
Contoh # 1 - Menggunakan Indeks Warna
Harta Indeks Warna berbeza dengan harta Warna di VBA. Dengan menggunakan nilai berangka, kita dapat mengubah warna sel, fon.
Nombor berkisar antara 1 hingga 56, dan setiap nombor mewakili warna yang berbeza. Berikut adalah senarai nombor dan warnanya.
Ok, mari kita uji ini.
Saya mempunyai nilai dalam sel A1.
Saya mahu menukar warna fon sel A1 menjadi hijau. Berikut adalah kodnya.
Kod:
Sub FontColor_Contoh1 () Julat ("A1"). Font.ColorIndex = 10 Sub Akhir
Ini akan mengubah warna fon sel A1 menjadi hijau.
Kita juga boleh menggunakan harta CELLS untuk menukar warna fon.
Kod:
Sub FontColor_Contoh1 () Sel (1, 1). Font.ColorIndex = 10 Sub Akhir
Seperti ini, kita dapat menggunakan angka dari 1 hingga 56 untuk menerapkan warna yang diinginkan pada fon.
Contoh # 2 - Menggunakan Harta Warna
Warna Indeks mempunyai warna yang sangat terhad dari 1 hingga 56, tetapi dengan menggunakan properti WARNA, kita dapat menggunakan 8 warna bawaan vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhite .
Untuk warna-warna ini, kami tidak perlu memberikan nombor apa pun. Sebaliknya kita boleh mengaksesnya dengan menggunakan namanya seperti yang ditunjukkan di atas. Berikut adalah kod contoh untuk semua 8 warna.
Kod:
Sub vbBlack_Contoh () Julat ("A1"). Font.Color = vbBlack End Sub
Kod:
Sub vbRed_Contoh () Julat ("A1"). Font.Color = vbRed Sub Akhir
Kod:
Sub vbGreen_Contoh () Julat ("A1"). Font.Color = vbGreen Sub Sub
Kod:
Sub vbBlue_Contoh () Julat ("A1"). Font.Color = vbBlue Akhir Sub
Kod:
Sub vbYellow_Contoh () Julat ("A1"). Font.Color = vbYellow Sub Akhir
Kod:
Sub vbMagenta_Contoh () Julat ("A1"). Font.Color = vbMagenta Akhir Sub
Kod:
Sub vbCyan_Contoh () Julat ("A1"). Font.Color = vbCyan End Sub
Kod:
Sub vbWhite_Contoh () Julat ("A1"). Font.Color = vbWhite End Sub
Contoh # 3 - Menggunakan Harta Warna dengan Fungsi RGB
Seperti yang telah kita lihat, kita hanya mempunyai 8 warna bawaan untuk digunakan. Tetapi untuk memiliki pelbagai warna, kita perlu menggunakan fungsi yang disebut RGB. Selain daripada warna bawaan, kita dapat membuat warna kita sendiri dengan menggunakan fungsi VBA RGB.
Lihat sintaks fungsi RGB.
RGB (Merah, Hijau, Biru)
RGB bermaksud "Merah, Hijau, dan Biru." Untuk membina warna, kita perlu membekalkan nombor dari 0 hingga 255 untuk setiap warna.
Berikut adalah beberapa contoh untuk anda.
Berikut adalah beberapa contoh kod makro
Kod:
Sub RGB_Contoh () Julat ("A1"). Font.Color = RGB (0, 0, 0) 'Ubah warna fon menjadi Sub
Kod:
Sub RGB_Contoh () Julat ("A1"). Font.Color = RGB (16, 185, 199) 'Warna fon akan menjadi Sub Akhir ini
Kod:
Sub RGB_Contoh () Julat ("A1"). Font.Color = RGB (106, 15, 19) 'Warna fon akan menjadi Sub Akhir ini
Kod:
Sub RGB_Contoh () Julat ("A1"). Font.Color = RGB (216, 55, 19) 'Warna fon akan menjadi Sub Akhir ini
