Bu dosya, bir renk seçim penceresi üzerinden seçili hücrelerin dolgu rengini veya sayfadaki "Donut" adlı şeklin rengini değiştirmeyi gösteren makro örneğidir. Renk, Excel'in kendi 56 renklik paletinden fare ile seçilir.
Dosyanın içeriği
- Sayfa1: Makroları çalıştıran butonların ve renklendirilecek Donut şeklinin bulunduğu tek çalışma sayfasıdır (A1:S25). Sayfada formül yoktur.
- UserForm1: 56 renk butonundan oluşan renk seçim formudur. Üzerinde seçilen rengin örneğini gösteren bir etiket, RGB değerini gösteren bir etiket ve iptal butonu bulunur.
- Module1 ve Class1: Renk seçimini ve renk uygulamasını yöneten makro kodlarıdır.
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.- GetAColor: Formdaki "ColorButton" etiketli butonları çalışma kitabının renk paletindeki renklerle boyar, formu açar ve seçilen rengi geri döndürür.
- WorkbookIsActive: Etkin bir çalışma kitabı olup olmadığını denetler; palet renkleri buna göre alınır.
- Test_GetAColor1: Renk seçtirir ve "Donut" şeklinin dolgu ve çizgi rengini seçilen renge çevirir. İşlem sonunda önceki seçim geri getirilir.
- Test_GetAColor2: Seçili öğe hücre aralığı değilse "Select a range." uyarısı verir; aralık seçiliyse hücrelerin dolgu rengini seçilen renk yapar.
- ColorButton_MouseMove: Fare bir rengin üzerine geldiğinde örnek etiketini o renkle boyar ve kırmızı, yeşil, mavi değerlerini yazar.
- ColorButton_MouseDown: Tıklanan butonun rengini kaydeder ve formu kapatır.
- CancelButton_Click: Seçimi iptal eder, hiçbir renk uygulanmaz.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Hücreyi boyamak için önce bir hücre veya hücre aralığı seçin, ardından hücre renklendirme butonuna tıklayın.
- Donut şeklini boyamak için şekil butonuna tıklayın.
- Açılan formda fareyi renklerin üzerinde gezdirerek örnek rengi ve RGB değerini izleyin.
- Uygulamak istediğiniz renge tıklayın; renk seçili hücrelere veya Donut şekline uygulanır. Vazgeçmek için iptal butonunu kullanın.
