Bu şablon, iç içe yerleştirilmiş ve her adımda belirli bir açıyla döndürülen karelerden spiral şekil çizer. Kare adedi ve toplam döndürme açısı değiştirildiğinde grafik anında güncellenir. Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- S: Kontrol sayfasıdır. "Geometrik Dizayn - SPIRAL (Kareler)" başlığı altında KARE Adedi değeri (F4, örnekte 127) ve KOMPLE Döndürme değeri (F6, örnekte 0) girilir. Spiral grafiği bu sayfadadır.
- H: Hesap sayfasıdır. Her kare için numara ve köşe noktalarının x, y koordinatları satır satır hesaplanır; grafik bu değerlerden beslenir.
Kullanılan formüller
- Kare numarası, bir önceki numaraya 1 eklenerek üretilir ve n değerini aşınca boş bırakılır:
- Her karenin açısı bir öncekine 1440/n derece eklenerek bulunur, kenar uzunluğu ise COS ile küçültülerek karelerin içe doğru daralması sağlanır.
- Köşe koordinatları SIN, COS ve RADIANS fonksiyonlarıyla hesaplanır; kare sayısı dışında kalan satırlarda NA döndürülür, böylece grafikte çizilmez.
Makrolar
Makrolar S sayfasının kod bölümündedir ve otomatik çalışır; ayrıca çalıştırılması gerekmez.- nBar_Change ve nBar_Scroll: Kare adedi çubuğunun değerini n hücresine yazar.
- wBar_Change ve wBar_Scroll: Döndürme çubuğunun değerini w hücresine yazar.
- Worksheet_Change: F4 veya F6 hücresine elle değer girildiğinde çalışır. Kare adedi 20 ile 250, döndürme 0 ile 360 arasındaysa değer yuvarlanıp ilgili çubuğa aktarılır; aralık dışı veya sayısal olmayan girişte önceki çubuk değeri geri yazılır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- S sayfasında kare adedini kaydırma çubuğuyla veya F4 hücresine 20-250 arası değer girerek belirleyin.
- Döndürme açısını çubukla veya F6 hücresine 0-360 arası değer girerek ayarlayın.
- Spiral grafiğin değişikliğe göre yeniden çizilmesini izleyin.