Excel VBA RGB Rengi
RGB , kırmızı yeşil ve mavi olarak da adlandırılabilir, bu işlev renk değerinin sayısal değerini elde etmek için kullanılır, bu işlevin adlandırılmış aralık olarak üç bileşeni vardır ve bunlar kırmızı, mavi ve yeşildir, diğer renkler bileşenler olarak kabul edilir. VBA'da bu üç farklı renkten.
VBA'da her şey, her bir parçanın kodlamasına bağlıdır. Örneğin, çalışma sayfasının bir kısmına başvurmak istiyorsanız, RANGE nesnesini kullanabiliriz. Yazı tipi rengini değiştirmek isterseniz, o zaman aralığın NAME özelliğini kullanabiliriz, sonra ihtiyacımız olan yazı tipi adını yazabiliriz, ancak bunun için yazı tipinin rengini veya hücrenin arka plan rengini değiştirmenin bir durumunu hayal edebiliriz. vbGreen, vbBlue, vbRed, vb. gibi yerleşik VB renklerini kullanabilir… Ancak farklı renklerle oynamak için özel işlevimiz var, yani RGB işlevi.
Aşağıda RGB renk işlevinin sözdizimi verilmiştir.
Yukarıda gördüğünüz gibi, üç argüman sağlayabiliriz, yani Kırmızı, Yeşil ve Mavi. Bu üç parametrenin tümü, yalnızca 0 ile 255 arasında değişen tam sayıları kabul edebilir ve bu işlevin sonucu "Uzun" veri türü olacaktır.
VBA RGB İşlevini Kullanarak Hücrelerin Rengini Değiştirme
Örnek 1
Örneğin, aşağıdaki resimde gösterildiği gibi A1 hücresinden A8'e kadar sayılarımız var.
Bu hücre aralığı için, RGB işlevini kullanarak yazı tipi rengini rasgele bir renge değiştirmeye çalışacağız.
Önce makro prosedürünü başlatın.
Kod:
Alt RGB_Örnek1 () Son Alt
İlk olarak, rengini değiştirmek istediğimiz yazı tiplerinin hücre aralığına başvurmamız gerekir. Bu durumda, hücre aralığımız A1'den A8'e kadardır, bu nedenle RANGE nesnesini kullanarak aynısını sağlayın .
Kod:
Alt RGB_Örnek1 () Aralık ("A1: A8") Son Alt
RANGE nesnesinin IntelliSense listesini görmek için nokta koyun. IntelliSense listesinden, yazı tipinin rengini değiştirmeye çalışıyoruz ve bu nedenle listeden FONT özelliğini seçiyoruz .
Kod:
Alt RGB_Örnek1 () Aralık ("A1: A8"). Yazı Tipi Son Alt
Bu özellikte FONT özelliği seçildikten sonra, rengi değiştirmeye çalışıyoruz , bu nedenle FONT'un renk özelliğini seçin.
Kod:
Alt RGB_Örnek1 () Aralık ("A1: A8"). Font.Color End Sub
Eşittir işareti koyun ve RGB işlevini açın.
Kod:
Alt RGB_Örnek1 () Aralık ("A1: A8"). Font.Color = RGB (End Sub
RGB işlevinin üç bağımsız değişkeni için 0 ile 255 arasında rasgele tam sayılar verin.
Kod:
Alt RGB_Örnek1 () Aralık ("A1: A8"). Font.Color = RGB (300, 300, 300) End Sub
Tamam, şimdi kodu çalıştırın ve A1'den A8'e kadar hücrelerin yazı tipi renklerinin sonucunu görün.
Çıktı:
Böylece yazı tipinin renkleri siyahtan diğerine değişti. Renk, RGB işlevine verdiğimiz sayılara bağlıdır.
Aşağıda, bazı yaygın renkleri elde etmek için RGB renk kodları verilmiştir.
Farklı renk türlerini elde etmek için tam sayı kombinasyonunu 0'dan 255'e değiştirebilirsiniz.
Örnek 2
Aynı hücre aralığı için, bu hücrelerin arka plan renginin nasıl değiştirileceğini görelim.
İlk olarak, RANGE nesnesini kullanarak hücre aralığını sağlayın .
Kod:
Alt RGB_Örnek2 () Aralık ("A1: A8"). Sub
Bu sefer bahsedilen hücrelerin arka plan rengini değiştiriyoruz, bu nedenle artık arka plan rengini değiştirmek için FONT özelliği ile hiçbir ilgimiz yok , RANGE nesnesinin " Interior " özelliğini seçin .
Kod:
Alt RGB_Örnek2 () Aralık ("A1: A8"). İç Uç Alt
"Interior" özelliği seçildikten sonra, bu "Interior" özelliğinin özelliklerini ve yöntemlerini görmek için bir nokta.
Kod:
Alt RGB_Örnek2 () Aralık ("A1: A8"). İç. Sub
Bahsedilen hücrelerin iç rengini değiştirdiğimiz için “ Renk ” özelliğini seçin.
Kod:
Alt RGB_Örnek2 () Aralık ("A1: A8"). Interior.Color End Sub
Hücre aralığının (A1 - A8) iç renk özelliğini ayarlamak için eşittir işaretini çıkarın ve RGB işlevini açın.
Kod:
Alt RGB_Örnek2 () Aralık ("A1: A8"). Interior.Color = RGB (End Sub
Rastgele sayıyı istediğiniz gibi girin.
Kod:
Alt RGB_Örnek2 () Aralık ("A1: A8"). Interior.Color = RGB (0, 255, 255) End Sub
Kodu çalıştırın ve arka plan rengini görün.
Çıktı:
Arka plan rengi değiştirildi.
Burada Hatırlanması Gereken Şeyler
- RGB, Kırmızı, Yeşil ve Mavi anlamına gelir.
- Bu üç renk kombinasyonu farklı renkler verecektir.
- Bu üç parametrenin tümü yalnızca 0 ile 255 arasındaki tamsayı değerlerini kabul edebilir. Bunun üzerindeki herhangi bir sayı 255'e sıfırlanacaktır.
