Excel Animasyonları - Kenar Çizgisini Kalınlaştırma

Bu dosya, Excel sayfasındaki bir WordArt nesnesinin kenar çizgisini VBA makrosuyla kalınlaştırıp tekrar inceltir. Sunum ve eğitim dosyalarında dikkat çekmek istenen başlıklara hareket kazandırmak için örnek olarak kullanılabilir.

Dosyanın içeriği​

• Sayfa1: İçinde "Wordart 1" adlı nesne bulunan tek çalışma sayfasıdır. Hücrelerde veri ya da formül yoktur.
• 1Modülü: Animasyon5 adlı makroyu içeren VBA modülüdür.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme, dışarıya bağlantı gibi zararlı bir işlem yoktur.

• Animasyon5: Etkin sayfadaki "Wordart 1" nesnesini seçer. Çizgi kalınlığını 0,1 değerinden başlayarak 50 adımda 0,1'er artırır, ardından 50 adımda aynı miktarda azaltır. Bu kalınlaşma ve incelme döngüsü iki kez tekrarlanır. Her adımda DoEvents çağrılarak ekranın güncellenmesi sağlanır. İşlem bitince A1 hücresi seçilir.

Makro, nesneyi adıyla aradığı için nesnenin adı "Wordart 1" olarak kalmalıdır. Nesne silinir ya da yeniden adlandırılırsa makro hata verir.

Nasıl kullanılır​

1. Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
2. Alt+F8 tuşlarıyla makro listesini açın.
3. Animasyon5 makrosunu seçip Çalıştır düğmesine tıklayın.
4. WordArt nesnesinin kenar çizgisinin kalınlaşıp incelmesini izleyin; animasyon iki tur sonra durur.
5. Aynı animasyonu kendi nesnenizde kullanmak için nesnenin adını makro kodundaki "Wordart 1" ifadesiyle eşleştirin.