Bu şablon, Excel formülleriyle düzgün çokgenin köşe koordinatlarını hesaplar ve çokgenin içinde filografik (iplik sanatı benzeri) üçgen taraması çizer. Kenar sayısı, yarıçap, döndürme açısı ve tarama adedi değiştirildiğinde grafik anında yenilenir.
Köşe noktalarının y değeri şu formülle hesaplanır:
Kenar orta noktaları ise komşu iki köşenin AVERAGE ortalaması ile bulunur. Boş satırlarda NA döndürülür; böylece grafik, kenar sayısına göre yalnızca gerekli noktaları çizer. OFFSET, tarama çizgilerinin uç noktalarını bir önceki noktadan alır. b adı, kenar sayısının tek, 4'e bölünebilir ya da çift olmasına göre başlangıç açısını belirler.
Dosyanın içeriği
- S: Kontrol sayfasıdır. Düzgün çokgen kenar adedi (n, örnekte 7), çevrel çember yarıçapı (a, örnekte 0.79), rotasyon açısı (ϕ, örnekte 53) ve üçgen tarama adedi (k) bu sayfada girilir. Grafik de bu sayfadadır.
- H: Hesap sayfasıdır. Köşe noktalarının y değerleri, kenar orta noktaları ve tarama çizgilerinin koordinatları burada üretilir. Sayfa A1:H952 aralığını kapsar.
Kullanılan formüller
Dosyada yaklaşık 1.870 formül vardır; ağırlıklı olarak IF, NA ve OFFSET fonksiyonları kullanılır. n, a, k, fi gibi değerler tanımlı adlarla çağrılır.Köşe noktalarının y değeri şu formülle hesaplanır:
Kenar orta noktaları ise komşu iki köşenin AVERAGE ortalaması ile bulunur. Boş satırlarda NA döndürülür; böylece grafik, kenar sayısına göre yalnızca gerekli noktaları çizer. OFFSET, tarama çizgilerinin uç noktalarını bir önceki noktadan alır. b adı, kenar sayısının tek, 4'e bölünebilir ya da çift olmasına göre başlangıç açısını belirler.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme ya da dışarıya bağlantı gibi işlem yoktur.- nBar, aBar, fBar, kBar kaydırma çubuklarının Change ve Scroll olayları, çubuk değerini ilgili hücreye yazar. Yarıçap çubuğunun değeri 100'e bölünerek a hücresine aktarılır.
- Worksheet_Change, hücreye elle girilen değeri denetler ve çubuğu buna göre günceller. Geçerli aralıklar: kenar adedi 3-9, yarıçap 0.5-1, açı 0-359, tarama adedi 0-50. Aralık dışı değer girilirse hücre çubuğun değerine döner.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- S sayfasında kaydırma çubuklarını kullanın ya da değerleri hücrelere doğrudan yazın.
- Kenar adedini 3-9 arasında seçin; yarıçapı ve döndürme açısını ayarlayın.
- Tarama adedini artırarak üçgenlerin sıklığını değiştirin ve grafiği izleyin.
