Bu dosya, Decimal renk değerlerinin RGB ve HSL karşılıklarını hesaplar; RGB ve HSL değerlerini de tekrar Decimal renk koduna çevirir. Dönüşümler, dosyadaki makrolarla tanımlanmış özel fonksiyonlarla yapılır. Seçilen hücredeki renk ayrıca bir önizleme penceresinde gösterilebilir.
Decimal değerin HSL karşılığı, makroyla tanımlı özel fonksiyonla bulunur:
RGB bileşenlerinden Decimal renk kodu şu fonksiyonla elde edilir:
Dosyada DECIMAL2HSL 101, RGB2DECIMAL 6, INT 3 kez kullanılmıştır.
Dosyanın içeriği
Dosyada tek sayfa vardır: Sheet1 (A1:U103). Sayfa, dönüşüm türüne göre bölümlere ayrılmıştır:- Decimal (A sütunu): Renk değerleri 167772 ile başlar; her satırda bir önceki değere yaklaşık 167772 eklenerek 16777216 sınırına kadar ilerler.
- Decimal-To-RGB (C sütunundan itibaren): Her Decimal değerin R, G ve B bileşenleri.
- Decimal-To-HSL (G sütunundan itibaren): H, S ve L değerleri.
- HSL-To-RGB (K sütunundan itibaren): HSL değerlerinden elde edilen R, G, B bileşenleri.
- RGB-TO-HSL (O sütunundan itibaren): RGB değerlerinden elde edilen HSL değerleri.
- RGB-To-Decimal (S sütunu) ve HSL-To-Decimal (U sütunu): Geriye doğru Decimal renk kodu hesabı.
Kullanılan formüller
Decimal sütunundaki değerler, bir önceki satıra yaklaşık 16777216/100 eklenerek ve tam sayıya yuvarlanarak üretilir:=INT(A3+(16777216/100))
=DECIMAL2HSL(A3)
=RGB2DECIMAL(C3,D3,E3)
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.- ModFunctions modülü: DECIMAL2RGB, RGB2DECIMAL, HSL2RGB, RGB2HSL, DECIMAL2HSL ve HSL2DECIMAL fonksiyonlarını içerir. HSL değerleri 0-255 ölçeğinde hesaplanır.
- ShowColor (Module1): Etkin hücredeki değeri renk olarak UserForm1 üzerindeki etikete uygular ve formu açık bırakarak çalışmaya izin verir.
- Worksheet_SelectionChange (Sheet1): UserForm1 açıkken seçilen hücre değiştikçe önizleme rengini günceller.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Dönüştürmek istediğiniz Decimal değeri A sütununa, RGB veya HSL değerlerini ilgili bölümün sütunlarına girin.
- Formüllü hücreler sonuçları otomatik hesaplar; daha fazla satır için son satırdaki formülleri aşağı kopyalayın.
- Rengi görmek için bir Decimal değer içeren hücreyi seçip ShowColor makrosunu çalıştırın; sonrasında hücre seçtikçe önizleme değişir.