Bu şablon, Sayfa1 üzerindeki C3:G13 aralığında yer alan tablonun dolgu rengini belirli aralıklarla değiştirir. Renk değişimi bir VBA makrosuyla sağlanır; her adımda beş renkten biri uygulanır. Dikkat çekmesi gereken tablolar ve sayaç benzeri görünümler için örnek olarak kullanılabilir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Bu formül, önceki satırın G sütunundaki değerin bir fazlasını alarak numaralandırmayı sürdürür.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sayfa1: C3:G13 aralığında sayıların bulunduğu tablo. İlk satırda C3, E3 ve G3 hücrelerinde 1, 3 ve 5 değerleri yer alır; sonraki satırlar aynı düzenle 20 değerine kadar devam eder.
- Module1: Renklendir adlı makroyu barındıran VBA modülü.
Kullanılan formüller
Tablodaki sayılar, her satırın bir önceki satırın son hücresinden devam etmesi için formülle üretilir. C4 hücresindeki formül şöyledir:=G3+1Makrolar
Renklendir makrosu şu şekilde çalışır:- Çalıştırıldığında Application.OnTime ile kendisini 2 saniye sonrası için yeniden zamanlar.
- Modül düzeyindeki Sayi sayacını bir artırır ve C3:G13 aralığının dolgu rengini Choose ile sırayla ColorIndex 3, 36, 50, 7 ve 34 değerlerine ayarlar.
- Sayaç 5 değerine ulaştığında sıfırlanır ve zamanlanmış çağrı iptal edilir; böylece beş renk bir kez gösterildikten sonra döngü durur.
Nasıl kullanılır
- Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
- Alt+F8 tuşlarıyla makro listesini açın, Renklendir makrosunu seçip Çalıştır düğmesine basın.
- C3:G13 aralığının rengi 2 saniye arayla beş renk boyunca değişir.
- Renk sırasını veya aralığı değiştirmek için Alt+F11 ile VBA düzenleyicisini açıp Module1 içindeki ColorIndex değerlerini ve hücre aralığını düzenleyin.
