Animasyon Örnekleri - Terazi

Bu dosya, Excel'de şekillerin VBA makrosu ile nasıl hareket ettirilebileceğini gösteren bir terazi animasyonu örneğidir. Sayfa üzerindeki terazi çizimi makro çalıştırıldığında sağa ve sola doğru sallanır.

Dosyanın içeriği​

• Sayfa1: B1:G14 aralığında yer alan terazi çizimi. Çizim, Grup 7 adlı gruplanmış şekil olarak hazırlanmıştır. Sayfada formül, tablo veya grafik bulunmaz.
• 1Modülü: Animasyon16 adlı makroyu içeren VBA modülü.

Makrolar​

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

• Animasyon16: Grup 7 şeklini seçer ve dönüş açısını (Rotation) adım adım değiştirir. Önce 0 dereceden 30 dereceye çıkar, sonra 30 dereceden -30 dereceye iner, ardından tekrar 0 dereceye döner. Bu salınım dört kez tekrarlanı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 güvenlik uyarısında makroları etkinleştirin.
2. Geliştirici sekmesinden Makrolar düğmesine tıklayın ya da Alt+F8 tuşlarına basın.
3. Animasyon16 makrosunu seçip Çalıştır düğmesine tıklayın.
4. Terazinin dört kez sallanmasını izleyin.
5. Farklı bir şekille denemek için Alt+F11 ile modülü açın ve koddaki Grup 7 adını kendi şeklinizin adıyla değiştirin.