Animasyon Örnekleri - İleri Geri Giden Araba

Bu dosya, Excel sayfasındaki bir resmin VBA makrosuyla yatayda hareket ettirilmesini gösteren animasyon örneğidir. Araba resmi sağa gider, sola geri döner ve yeniden sağa ilerler. Makro mantığını öğrenmek isteyenler için kısa ve anlaşılır bir uygulamadır.

Dosyanın içeriği​

• Sayfa1: Animasyonun uygulandığı sayfadır. Sayfadaki açıklama notlarına göre araba, GIF uzantılı herhangi bir resim olabilir; bulut gibi diğer resimler de animasyonla kullanılabilir. Hareket ettirilen nesnenin adı Resim 1 olmalıdır.
• 1Modülü: Animasyonu çalıştıran Animasyon6 makrosunu içerir.

Dosyada formül bulunmaz; tüm işlem makro ile yapılır.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kod dosya silme veya dışarıya bağlantı gibi işlemler yapmaz; yalnızca sayfadaki resmin konumunu değiştirir.

• Animasyon6: Resim 1 adlı nesneyi seçer ve başlangıç konumunu 200 olarak belirler. Ardından resmin Left değeri üç aşamada adım adım değiştirilir: önce 330 adımda 0,75 birim sağa, sonra 580 adımda 0,75 birim sola, son olarak 250 adımda yeniden sağa kaydırılır. Her adımda DoEvents kullanıldığı için hareket ekranda akıcı biçimde izlenir. İşlem bitince A1 hücresi seçilir.

Nasıl kullanılır​

1. Dosyayı açın ve istenirse makroları etkinleştirin.
2. Geliştirici sekmesinden Makrolar penceresini açın (Alt+F8).
3. Animasyon6 makrosunu seçip Çalıştır düğmesine tıklayın.
4. Kendi resminizi kullanmak için resmi sayfaya ekleyin ve adını Resim 1 olarak değiştirin.
5. Hareketin uzunluğunu veya hızını değiştirmek için Alt+F11 ile VBA düzenleyicisini açıp başlangıç değerini, adım sayılarını ya da 0,75 olan adım büyüklüğünü düzenleyin.