Kolor czcionki Excel VBA
Właściwość Kolor czcionki VBA służy do zmiany koloru czcionki komórek programu Excel za pomocą kodu VBA . Kolor czcionki możemy zmieniać na wiele sposobów wykorzystując indeks kolorów, właściwość koloru z funkcją RGB.
Kiedy przygotowuję dashboard w Excelu, zwykle spędzam dużo czasu na formatowaniu komórek, czcionek itp. Często czuję się jak kosmetyczka, patrząc na różne kolory formatowania Excela. Zmiana koloru czcionki w arkuszu programu Excel jest łatwym zadaniem, ale jeśli chodzi o Excel, powinieneś znać sposoby pisania kodu VBA, aby zmienić kolor czcionki.
Aby zmienić kolor czcionki, najpierw musimy określić, jakie komórki zamierzamy zmienić.
Zakres („A1: A10”)
Następnie musimy wybrać właściwość FONT.
Zakres („A1: A10”). Czcionka
W takim razie co chcemy zrobić z tą czcionką, więc wybierz Kolor?
Zakres („A1: A10”). Font.Color
W ten sposób musimy skonstruować kod, aby zmienić kolor czcionki. Wygląda na trudne, prawda?
Ale pamiętaj, że na początku wszystko wydaje się trudne, później to zrozumiesz.
Jak zmienić kolor czcionki za pomocą VBA?
Możesz pobrać ten szablon programu Excel w kolorze czcionki VBA tutaj - Szablon programu Excel w kolorze czcionki VBAPrzykład 1 - Korzystanie z indeksu kolorów
Właściwość Color Index różni się od właściwości Color w VBA. Używając wartości liczbowych, możemy zmienić kolor komórek, czcionki.
Liczby mieszczą się w zakresie od 1 do 56, a każda liczba reprezentuje inny kolor. Poniżej znajduje się lista liczb i ich kolorów.
Ok, przetestujmy to.
Mam wartość w komórce A1.
Chcę zmienić kolor czcionki komórki A1 na zielony. Poniżej znajduje się kod.
Kod:
Sub FontColor_Example1 () Range ("A1"). Font.ColorIndex = 10 End Sub Spowoduje to zmianę koloru czcionki komórki A1 na zielony.
Możemy również użyć właściwości CELLS, aby zmienić kolor czcionki.
Kod:
Sub FontColor_Example1 () Cells (1, 1) .Font.ColorIndex = 10 End Sub
W ten sposób możemy użyć liczb od 1 do 56, aby nadać czcionce żądany kolor.
Przykład 2 - użycie właściwości koloru
Color Index ma bardzo ograniczone kolory od 1 do 56, ale używając właściwości COLOR możemy użyć 8 wbudowanych kolorów vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhite .
W przypadku tych kolorów nie musimy podawać żadnych liczb, możemy po prostu uzyskać do nich dostęp, używając ich nazw, jak pokazano powyżej. Poniżej znajduje się przykładowy kod dla wszystkich 8 kolorów.
Kod:
Sub vbBlack_Example () Range ("A1"). Font.Color = vbBlack End Sub Kod:
Sub vbRed_Example () Range ("A1"). Font.Color = vbRed End Sub Kod:
Sub vbGreen_Example () Range ("A1"). Font.Color = vbGreen End Sub Kod:
Sub vbBlue_Example () Range ("A1"). Font.Color = vbBlue End Sub Kod:
Sub vbYellow_Example () Range ("A1"). Font.Color = vbYellow End Sub Kod:
Sub vbMagenta_Example () Range ("A1"). Font.Color = vbMagenta End Sub Kod:
Sub vbCyan_Example () Range ("A1"). Font.Color = vbCyan End Sub Kod:
Sub vbWhite_Example () Range ("A1"). Font.Color = vbWhite End Sub Przykład # 3 - Używanie właściwości koloru z funkcją RGB
Jak widzieliśmy, mamy tylko 8 wbudowanych kolorów do pracy. Ale aby mieć szeroką gamę kolorów, musimy użyć funkcji o nazwie RGB, oprócz wbudowanych kolorów możemy tworzyć własne kolory za pomocą funkcji vba RGB.
Spójrz na składnię funkcji RGB.
RGB (czerwony, zielony, niebieski)
RGB oznacza „czerwony, zielony i niebieski”. Aby skonstruować kolory, musimy podać liczby od 0 do 255 dla każdego koloru.
Poniżej znajduje się kilka przykładów dla Ciebie.
Poniżej znajduje się kilka przykładów kodu makr
Kod:
Sub RGB_Example () Range ("A1"). Font.Color = RGB (0, 0, 0) 'Zmień kolor czcionki na czarny End Sub Kod:
Sub RGB_Example () Zakres ("A1"). Font.Color = RGB (16, 185, 199) 'Kolor czcionki będzie oznaczony jako End Sub Kod:
Sub RGB_Example () Zakres ("A1"). Font.Color = RGB (106, 15, 19) 'Kolor czcionki będzie oznaczony jako End Sub Kod:
Sub RGB_Example () Zakres ("A1"). Font.Color = RGB (216, 55, 19) 'Kolor czcionki będzie oznaczony jako End Sub
