Excel VBA Yazı Tipi Rengi
VBA Yazı Tipi Rengi özelliği, vba kodunu kullanarak excel hücrelerinin yazı tipi rengini değiştirmek için kullanılır. Yazı tipinin rengini renk indeksi, renk özelliği ve RGB işlevi kullanarak çeşitli şekillerde değiştirebiliriz.
Excel'de bir gösterge panosu hazırladığımda, genellikle hücreleri, yazı tiplerini vb. Biçimlendirmek için önemli miktarda zaman harcıyorum. Genellikle excel biçimlendirmesinin çeşitli renklerine bakarak kendimi mükemmel bir güzellik uzmanı gibi hissediyorum. Excel çalışma sayfasındaki yazı tipi rengini değiştirmek kolay bir iştir, ancak Excel söz konusu olduğunda, yazı tipi rengini değiştirmek için VBA kodu yazmanın yollarını bilmelisiniz.
Yazı tipi rengini değiştirmek için önce değiştireceğimiz hücrelerin ne olduğunu belirlememiz gerekir.
Aralık ("A1: A10")
Sonra FONT özelliğini seçmemiz gerekiyor.
Aralık ("A1: A10"). Yazı Tipi
O zaman bu yazı tipiyle ne yapmak istiyoruz, o halde Renk'i seçin.
Aralık ("A1: A10"). Font.Color
Bunun gibi, yazı tipi rengini değiştirmek için kodu oluşturmamız gerekir. Zor görünüyor, değil mi?
Ama unutmayın, her şey başlangıçta zor görünüyor, daha sonra asılacaksınız.
VBA kullanarak Yazı Tipi Rengi Nasıl Değiştirilir?
Örnek 1 - Renk İndeksini Kullanma
Color Index özelliği, VBA'daki Color özelliğinden farklıdır. Sayısal değerleri kullanarak hücrelerin, yazı tiplerinin rengini değiştirebiliriz.
Sayılar 1 ile 56 arasında değişir ve her sayı farklı renkleri temsil eder. Aşağıda sayıların ve renklerinin listesi bulunmaktadır.
Tamam, bunu deneyelim.
A1 hücresinde bir değerim var.
A1 hücre yazı tipinin rengini yeşile değiştirmek istiyorum. Kod aşağıdadır.
Kod:
Alt FontColor_Example1 () Aralık ("A1"). Font.ColorIndex = 10 End Sub
Bu, A1 hücresinin yazı tipinin rengini yeşile değiştirecektir.
Yazı tipinin rengini değiştirmek için CELLS özelliğini de kullanabiliriz.
Kod:
Alt FontColor_Example1 () Hücreler (1, 1) .Font.ColorIndex = 10 End Sub
Bunun gibi, istenen rengi yazı tipine uygulamak için 1'den 56'ya kadar sayıları kullanabiliriz.
Örnek 2 - Renk Özelliğini Kullanma
Color Index, 1'den 56'ya kadar çok sınırlı renge sahiptir, ancak COLOR özelliğini kullanarak, 8 yerleşik renk vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhite kullanabiliriz .
Bu renkler için herhangi bir numara vermemize gerek yoktur. Aksine, yukarıda gösterildiği gibi adlarını kullanarak onlara erişebiliriz. Aşağıda 8 rengin tümü için örnek kod verilmiştir.
Kod:
Alt vbBlack_Example () Aralık ("A1"). Font.Color = vbBlack End Sub
Kod:
Alt vbRed_Example () Aralık ("A1"). Font.Color = vbRed End Sub
Kod:
Alt vbGreen_Example () Aralık ("A1"). Font.Color = vbGreen End Sub
Kod:
Alt vbBlue_Example () Aralık ("A1"). Font.Color = vbBlue End Sub
Kod:
Alt vbYellow_Example () Aralık ("A1"). Font.Color = vbYellow End Sub
Kod:
Alt vbMagenta_Example () Aralık ("A1"). Font.Color = vbMagenta End Sub
Kod:
Alt vbCyan_Example () Aralık ("A1"). Font.Color = vbCyan End Sub
Kod:
Alt vbWhite_Example () Aralık ("A1"). Font.Color = vbWhite End Sub
Örnek 3 - RGB İşleviyle Renk Özelliğini Kullanma
Gördüğümüz gibi, üzerinde çalışabileceğimiz sadece 8 yerleşik renge sahibiz. Ancak çok çeşitli renklere sahip olmak için RGB adı verilen işlevi kullanmamız gerekir. Yerleşik renklerin yanı sıra, VBA RGB işlevini kullanarak kendi renklerimizi oluşturabiliriz.
RGB işlevinin sözdizimine bakın.
RGB (Kırmızı, Yeşil, Mavi)
RGB, "Kırmızı, Yeşil ve Mavi" anlamına gelir. Renk oluşturmak için her renk için 0 ile 255 arasında sayılar sağlamamız gerekir.
Aşağıda sizin için birkaç örnek var.
Aşağıda bazı makro kodu örnekleri verilmiştir
Kod:
Alt RGB_Example () Aralık ("A1"). Font.Color = RGB (0, 0, 0) 'Yazı tipi rengini siyah olarak değiştirin End Sub
Kod:
Alt RGB_Example () Aralık ("A1"). Font.Color = RGB (16, 185, 199) 'Yazı tipi rengi bu End Sub olacak
Kod:
Alt RGB_Example () Aralık ("A1"). Font.Color = RGB (106, 15, 19) 'Yazı tipi rengi bu End Sub olacak
Kod:
Alt RGB_Example () Aralık ("A1"). Font.Color = RGB (216, 55, 19) 'Yazı tipi rengi bu End Sub olacak
