Dönen Düzgün Altıgen Kenarlar Oluşturma

Dönen Düzgün Altıgen Kenarlar Oluşturma

Dönen Düzgün Altıgen Kenarlar Oluşturma
Bu dosya, iç içe yerleştirilmiş düzgün altıgenlerin kenarlarını trigonometrik hesaplarla çizen ve istenen açıdan başlayarak döndüren bir geometrik dizayn çalışmasıdır. Dönen düzgün altıgen kenarlar oluşturma işlemi parametreler değiştirilerek izlenir; animasyon VBA makrosuyla çalışır.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

  • S: Kontrol sayfasıdır. En içteki altıgenin kenar uzunluğu (varsayılan 0.82), içten dışa iç içe altıgen adedi (varsayılan 10) ve başlangıç açısı burada ayarlanır. Animasyon düğmesi, sayaç ve süre alanları ile grafik de bu sayfadadır.
  • H: Hesap sayfasıdır. Kenar uzunlukları, toplamlı değerler, sıralamalar, açılar ve grafiğe giden koordinatlar bu sayfada satır satır hesaplanır.

Kullanılan formüller​

Hesap sayfasında yaklaşık 700 formül vardır. Başlıca fonksiyonlar IF, SIN, COS, RADIANS, PI, INDEX, SMALL, RANK, COUNTIF, MOD ve IFERROR fonksiyonlarıdır.
Kenar uzunluklarının sıralanması için kullanılan formül:
Excel formülü
=RANK(G3;$G$3:$G$16;1)+EĞERSAY($G$3:G3;G3)-1
=RANK(G3,$G$3:$G$16,1)+COUNTIF($G$3:G3,G3)-1
Aynı sıra değerlerinin çakışmasını önleyen bu yapı, kenarların sıralı biçimde eşleştirilmesini sağlar. Çizim koordinatları SIN ve COS ile hesaplanır; açı RADIANS ile radyana çevrilir ve çizilemeyen noktalar NA ile grafikte gizlenir. Dosyada a, n, w, s, sa, stp ve süre adlı tanımlı adlar kullanılır.

Makrolar​

  • aBar, nBar, wBar: Kaydırma çubukları sırasıyla kenar uzunluğunu (0.5 ile 1 arası), altıgen adedini (0 ile 10 arası) ve başlangıç açısını (0 ile 359 arası) değiştirir. Hücreye elle değer girildiğinde çubuk güncellenir; sınır dışı değer girilirse çubuktaki değere geri döner.
  • basla: Animasyonu başlatır. Açıyı her adımda 2 derece artırır, geçen süreyi hesaplar ve çalışma sırasında çubukları ile düğmeyi devre dışı bırakıp sayfayı korumaya alır.
  • dur: Animasyonu durdurur, sayfanın korumasını kaldırır ve kontrolleri yeniden etkinleştirir.
  • deger (RButon düğmesi): H sayfasındaki B3:B52 aralığına 19 ile 90 arasında rastgele kenar değerleri üretir ve bunları sabit değere çevirir.
Kodda dosya silme veya dış bağlantı işlemi yoktur.

Nasıl kullanılır​

  1. Dosyayı açıp makroları etkinleştirin.
  2. S sayfasında kenar uzunluğu, altıgen adedi ve başlangıç açısını çubuklarla ya da hücrelere değer girerek belirleyin.
  3. Animasyonu başlatmak için animasyon düğmesini kullanın; grafikteki altıgenler dönmeye başlar.
  4. Durdurmak için durdurma düğmesini kullanın; sayfa koruması otomatik kalkar.
  5. Rastgele kenar uzunlukları için RButon düğmesine tıklayın.

Galeri

  • Dönen Düzgün Altıgen Kenarlar Oluşturma - 1
    Dönen Düzgün Altıgen Kenarlar Oluşturma - 1

ExcelDepo tarafından daha fazla dosya

Detaylar
Yazar
ExcelDepo
İndirme
4
Gösterim
1,495
İlk sürüm
Güncel
SHA-256
e9576bd6b1090a77d2f1483e452214a86856a93b912a3d06068261b350049094

Puanlar

5.00 Oylama 1 İnceleme
Geri
Üst