Belli bir yaşın üzerindeyseniz, tüm bilgisayar raporlarının MIS departmanı tarafından COBOL ve yüksek hızlı bir IBM Satır Yazıcısı kullanılarak üretildiğini hatırlayacaksınız. Bu raporlar her zaman "Greenbar" adlı kağıda yazdırılır. Dört sıra yeşille, ardından dört sıra beyazla gölgelendirildi. Bu raporlar 132 karaktere sahipti ve renkleri takip edebilmek, rapordaki yerinizi korumanıza yardımcı oldu.
Excel'de Greenbar biçimlendirmesini kullanmak güzel bir retro görünüme sahiptir. Sayfadaki satırları takip etmek de hala daha kolay. Bu makale, bir rapora yeşil çubuk biçimlendirmesi uygulamak için üç seçeneği tartışacaktır.
Yöntem 1
Otomatik Biçimlendirmeyi Kullan
- Bir liste biçiminde verilerle başlayın.
- Listedeki herhangi bir hücreyi seçin.
- Menüden Biçim - Otomatik Biçimlendir'i seçin
- Otomatik Biçimlendir iletişim kutusunda 6 biçim göreceksiniz. Üçüncü format sayfasına kaydırmak için kaydırma çubuğunu kullanın. List2 adlı biçimi seçin. Tamam'ı tıklayın.
Excel, gösterildiği gibi bir yeşil çubuk efekti uygulayacaktır:
Bu yöntemin dezavantajı, verileri sıralarken, biçimlendirmenin orijinal satırla birlikte hareket etmesidir. Yukarıdaki verileri müşteriye göre sıraladıktan sonra, 2-yeşil ve ardından 2-beyazın güzel deseni, yeşil ve beyazın gelişigüzel bir modelidir:
Yöntem 2
Koşullu Biçimlendirme Kullanın
- Listenizdeki tüm hücreleri seçin.
- Menüden Biçim> Koşullu Biçim'i seçin
- Koşullu Biçim iletişim kutusunda, ilk açılır menüyü "Hücre Değeri" yerine "Formüldür" olarak değiştirin.
- Formülü Formül kutusuna girin:
=MOD(ROW(),2)=0 - Biçimlendir… düğmesini tıklayın
- Hücreleri Biçimlendir iletişim kutusunda, Kalıplar sekmesini tıklayın
- Açık yeşil (veya açık mavi veya açık sarı) bir desen seçin. Tamam'ı tıklayın.
- Koşullu Biçimlendirme iletişim kutusunu kapatmak için Tamam'a tıklayın
Sonuç, vurgulanan her diğer satırla birlikte bir yeşil çubuk etkisi olacaktır. Koşullu biçimlendirme ile oluşturulur. Verileri yeniden sıralayabilir, satırları silebilir ve hatta verilerin ortasına satırlar ekleyebilirsiniz. Yeşil çubuk biçimlendirme etkisi devam edecektir.
Koşullu Biçimlendirme kutusundaki formül MOD işlevini kullanır. Uzun bölme yapmayı ilk öğrendiğiniz zamanı hatırlıyor musunuz? 7'yi 25'e bölmek zorunda olsaydınız, "3'ün 4'ün Kalanıyla" cevabını bulabilir misiniz? MOD işlevi, bölmeyi yaptıktan sonra kalanı söyler. Yani =MOD(25,7)4 olur - çünkü 7'den sonra kalan 25'e 4 olur.
Yukarıdaki koşullu biçimlendirmede, satır numarasını 2'ye böldünüz. Kalan 0 ise, bu çift numaralı bir satırdır ve koşullu biçim kalıbı uygulanmıştır.
Alternatif bantlama desenleri oluşturmak için formülle deney yapmak mümkündür. Örneğin, satır numarasını 8'e bölün. Kalan 0 ile 3 arasındaysa, yeşil bir model kullanın. Aksi takdirde, beyaz deseni kullanın. İşte bazı örnek formüller:
- 2 Yeşil ardından 2 beyaz:
=MOD(ROW(),4)<2 - 3 Yeşil ardından 3 beyaz:
=MOD(ROW(),6)<3 - 4 Yeşil ardından 4 beyaz:
=MOD(ROW(),8)<4
Yöntem 3
Bir VBA Makrosu Kullanın
Verilerinizde gizli satırlar varsa yukarıdaki yöntem başarısız olur. Otomatik Filtre veya Grup ve Anahat Modu kullanıyorsanız bu yaygındır. Verilerinizde zaten koşullu biçimlendirme varsa, Yöntem 2 kullanılamaz. Bu durumda çözüm aşağıdaki makrodur. Visual Basic Düzenleyicisi hakkında bilgi sahibi değilseniz, Excel VBA Düzenleyicisine Giriş bölümünü okuyun.
Standart bir modüle aşağıdaki kodu girin:
Sub ApplyGreenBarToSelection() n = 0 For Each VisRow In Selection.Resize(, 1).SpecialCells(xlCellTypeVisible) n = n + 1 If n Mod 2 = 0 Then VisRow.EntireRow.Interior.ColorIndex = 35 End If Next VisRow End SubAşağıdaki görselde, Otomatik Filtre özelliğini açtım ve sadece Müşteri DEF kayıtlarına göre filtre uyguladım. Seçimdeki tüm hücreleri seçin ve ApplyGreenBarToSelection öğesini çalıştırmak için Araçlar - Makro - Makrolar'ı kullanın.
Bu VBA makrosunun anahtarı .SpecialCells yöntemidir.
