Belirli bir biçimlendirilmiş hücreyi veya renkli hücreleri bir sütundan sonraki sütuna kopyalamak istiyorsanız bu makale tam size göre. Bu yazıda VBA kodunu kullanarak renkli hücrelerin nasıl kopyalanacağını öğreneceğiz.
Aşağıdaki, elimizdeki verilerin anlık görüntüsüdür, yani A sütunu birkaç sarı renkli hücre içeren verileri içerir.
Yalnızca sarı renkle vurgulanan verileri çıkarmak için; renkli hücreleri yalnızca B sütununda göstermek için bir UDF oluşturmamız gerekiyor
- Kullanıcı Tanımlı Fonksiyon oluşturmak için aşağıdaki adımları izleyeceğiz:
- Geliştirici sekmesine tıklayın
- Kod grubundan Visual Basic'i seçin
- Standart modülde aşağıdaki kodu kopyalamamız gerekiyor
İşlev Sarı(ByRef r As Range)
r.Interior.ColorIndex = 6 ise
Sarı = r.Value
Başka
IsYellow = vbNullString
Bitir
Bitiş İşlevi
- B1 hücresinde formül şu şekilde olacaktır: =Sarı(A1)
Yukarıdaki kod, yalnızca Sarı renk için kullanılan renk # 6 ile özellikle eşleşiyor. Bu nedenle, udf yalnızca renk#6'yı içeren değerleri çıkaracaktır.
Kırmızı renk hücrelerini çıkarmak istiyorsak, belirtilen renk numarasını kontrol etmemiz ve basitçe sarı renk numarasıyla değiştirmemiz gerekir.
Bu şekilde vba kodunu kullanarak sarı yazı tipi renk hücrelerini alabiliriz.
İndir - VBA Kullanarak Belirli Renk Dizinini Çıkarın - xlsm