Dosya simgesi

Eşmerkezli Paralel Kare Elipsler

Bu şablon, ortak merkezli ve birbirine paralel kare elipslerin grafik üzerinde çizilmesini sağlar. Dış elipsin yarı kenar uzunluğu, eksenlerin döndürme açısı ve iç içe elips adedi değiştirildiğinde grafik yeni değerlere göre yeniden çizilir. Geometrik desen ve tasarım çalışmaları için kullanılabilir.

Not: Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

  • S: Giriş sayfasıdır. "DIŞ Kare Elips için YARI Kenar Uzunluğu" (varsayılan 0.81), "KOMPLE Döndürme (Eksenlerin Döndürülmesi)" (varsayılan 0) ve "İç İçe Kare Elips Adedi" (varsayılan 25) değerleri bu sayfada girilir. Sayfadaki grafik ve kaydırma çubukları da burada yer alır.
  • H: Hesap sayfasıdır. "No" ve "Yarı Kenar Uz." sütunlarında her elips için sıra numarası ve yarı kenar uzunluğu listelenir.
Dosyada E01.x, E01.y gibi tanımlı adlarla her elipsin x ve y koordinatları oluşturulur. Yarı kenar değeri a adıyla S sayfasındaki F4 hücresine bağlıdır.

Kullanılan formüller​

H sayfasında numaralandırma IF fonksiyonuyla yapılır. İlk satır, elips adedi en az 1 ise 1 değerini verir:
Excel formülü
=EĞER(n>=1;1;"")
=IF(n>=1,1,"")
Sonraki satırlarda numara bir artırılır; adet sınırı aşıldığında hücre boş bırakılır. Böylece yalnızca seçilen adet kadar elips listelenir ve çizilir.

Makrolar​

Makrolar S sayfasının kod bölümünde yer alır ve sayfa üzerindeki üç kaydırma çubuğunu hücrelerle eşler.
  • aBar: Çubuk değerinin 100'e bölünmesiyle yarı kenar uzunluğu hücresini günceller.
  • wBar: Döndürme açısı hücresini çubuk değerine eşitler.
  • nBar: İç içe elips adedi hücresini çubuk değerine eşitler.
  • Worksheet_Change: Hücreye değer elle yazıldığında çalışır ve çubuğu günceller. Geçerli aralıklar: yarı kenar 0,5 ile 1; döndürme 0 ile 360; adet 0 ile 40. Aralık dışı veya sayısal olmayan girişte hücre, çubuğun mevcut değerine döndürülür.
Makrolar kendiliğinden çalışır; ayrıca başlatmak gerekmez. Kodda dosya silme ya da dış bağlantı gibi işlem yoktur.

Nasıl kullanılır​

  1. Dosyayı açın ve makroları etkinleştirin.
  2. S sayfasında yarı kenar uzunluğunu, döndürme açısını ve elips adedini kaydırma çubuklarıyla ya da hücrelere değer yazarak belirleyin.
  3. Grafiğin yeni değerlere göre yeniden çizilmesini izleyin.
  4. Tasarım istenen biçime gelene kadar değerleri değiştirin.

52779 tarafından daha fazla dosya

Detaylar
Yazar
52779
İndirme
6
Gösterim
1,934
İlk sürüm
Güncel
SHA-256
b904c8ce98ae16f6cebeae3d7838b38b820f9400c1dbabe745153adf8ced9d5d

Puanlar

5.00 Oylama 1 İnceleme

En son değerlendirmeler

Güzel bir çalışma olmuş, teşekkürler.
Geri
Üst