Dönen Doğrular Animasyonu

Bu dosya, doğru parçalarının kendi orta noktaları etrafında dönmesiyle oluşan desenin Excel grafiği üzerinde canlandırıldığı bir animasyon şablonudur. Başlangıç açısı ve dönüş hızı kaydırma çubuklarıyla ayarlanır, animasyon makro ile başlatılıp durdurulur.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• S: Kontrol sayfasıdır. "Animasyon - Dönen Doğrular" başlığı, animasyon hızı, sayaç ve süre alanları ile adım adım ilerleme ayarı burada yer alır. Sayfadaki grafik doğruların hareketini gösterir; açı ve hız için wBar ve hBar kaydırma çubukları kullanılır.
• H: Hesap sayfasıdır (A1:H601). Her doğru için numara (No), merkez Y değeri ve doğru uçlarının x ve y koordinatları hesaplanır. Grafik bu koordinatlardan beslenir.

Kullanılan formüller​

• Her doğrunun merkez konumu, numaraya göre kademeli olarak belirlenir. Örnek olarak C3 hücresinde şu formül kullanılır:
  
  Excel formülü

  =-9.5+INT(A3/20)*2+IF(MOD(A3,20)=0,-2,0)

• COS, SIN ve PI fonksiyonları, doğru uçlarının koordinatlarını merkezden 0.4 birim uzaklıkta ve dönüş açısına göre hesaplar. Örneğin E3 hücresinde şu formül bulunur:
  
  Excel formülü

  =C3+0.4*COS(v)

• Dönüş açısı v adlı tanımlı ad ile verilir. Animasyon çalışırken sayaç değerinin 360'a göre kalanı, durduğunda ise w hücresindeki açı kullanılır ve radyana çevrilir.
• A sütunundaki numaralar her satır grubunda bir artırılarak ilerler; INT ve MOD doğruları 20'şerli gruplara ayırır.

Makrolar​

• basla: Animasyonu başlatır. Sayaç, süre ve durdurma değerini sıfırlar, kaydırma çubuklarını devre dışı bırakır ve sayfayı korumaya alır. Ardından bir döngüde sayaç değerini başlangıç açısı ile adım büyüklüğüne göre sürekli artırır ve geçen süreyi yazar.
• dur: Döngüyü durdurur, sayfa korumasını kaldırır ve kaydırma çubuklarını yeniden etkinleştirir.
• wBar_Change, wBar_Scroll, hBar_Change: Kaydırma çubuğu değerlerini ilgili hücrelere aktarır.
• Worksheet_Change: Açı hücresine 0-359, hız hücresine 1-3 dışında bir değer girilirse değeri kaydırma çubuğundaki değere geri döndürür.

Makro kodunda dosya silme ya da dış bağlantı gibi işlem bulunmaz.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. S sayfasında başlangıç açısını (0-359) ve animasyon hızını (1-3) kaydırma çubuklarıyla veya hücrelere değer yazarak belirleyin.
3. basla makrosunu çalıştırarak animasyonu başlatın.
4. Durdurmak için dur makrosunu çalıştırın; ardından ayarları değiştirebilirsiniz.