Animasyon Örnekleri - Açılan Ferman

Bu dosya, Excel sayfası üzerindeki bir şeklin VBA makrosuyla adım adım genişletilerek ferman gibi açılmasını gösteren bir animasyon örneğidir. Animasyon tamamlandığında şeklin içine A1 hücresindeki metin yazılır.

Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: A1:G13 aralığını kullanan tek sayfadır. Üzerinde Ferman adlı şekil bulunur. 6. satırdaki A6 hücresinde "Hayal ettiğinizden daha fazlası" metni yer alır.
• 1Modülü: Animasyon13 adlı makroyu içeren VBA modülüdür.

Dosyada formül, grafik veya tablo bulunmaz; çalışma tamamen makroya dayanır.

Makrolar​

• Animasyon13: Önce Ferman adlı şekli seçer ve içindeki metni siler. Ardından 140 adımlık bir döngü çalıştırır; her adımda şeklin genişliği 1 birim artırılır ve şeklin ilk ayar noktası (Adjustments) da aynı oranda değiştirilir. DoEvents sayesinde her adım ekranda görünür ve açılma animasyonu oluşur.
• Döngü bittiğinde A1 hücresindeki metin şeklin içine yazılır. Metnin ilk 22 karakterine Arial Tur yazı tipi, 10 punto, kalın, gölgeli, dış çizgili ve kırmızı renk (ColorIndex 3) biçimi uygulanır. En sonda A1 hücresi seçilir.

Makro dosya silme veya dışarıya bağlantı gibi bir işlem yapmaz; yalnızca sayfadaki şekli ve metni değiştirir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Alt+F8 tuşlarıyla makro listesini açın, Animasyon13 makrosunu seçip Çalıştır düğmesine basın.
3. Şeklin genişleyerek açılmasını izleyin; animasyon sonunda şeklin içinde A1 hücresindeki metin görünür.
4. Şeklin içinde farklı bir metin görmek için A1 hücresindeki yazıyı değiştirip makroyu yeniden çalıştırın.