---

Hallo zusammen,

1. Weiß jemand wie ich die Länge eines Zylinders
mit VBA errechnen kann?

2. Wie kann ich heraus finden, das es sich bei einem
Volumenkörper um einen Zylinder handelt?

Gruß Jörn

------------------
Gruß Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Jörn,

Du kannst mit Object.SolidType herausfinden, ob es sich um einen Zylinder handelt. Aber das klappt, so meine ich erst ab AutoCAD 2007.

Wenn du den Durchmesser des Zylinders kennst kannst du doch mit getboundingbox die Gesamtabmaße ermitteln und dann herausfinden, welches Maß des Zylinders die Länge ist.

Edit: Wenn du die Abmaße der Boundingbox hast, Kannst du die Länge, Breite und Höhe vergleichen. Die Beiden Werte, die gleich groß sind, sind dann der Durchmesser und das andere Maß ist dann die Länge.

Gruß, Carsten

[Diese Nachricht wurde von Carsten1210 am 19. Jan. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Carsten,

Vielen Dank für deine Antwort.

1. Object.SolidType, AutoCad 2007 ==> OK, warten.

2. Wenn du den Durchmesser des Zylinders ken....==> Nein
  Wenn du die Abmaße der Boundingbox hast ==>
              Die Boundingbox ist doch nur 2D !???

Also, so hab ichs noch nicht, oder kapier ich nicht?

------------------
Gruß Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Jörn,

Hier mal ein Ansatz, ist aber ungetestet.

Gruß, Carsten

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Carsten,

Der Tip ist super.
Der Ansatz ist wohl OK.
Ich krieg es aber zur Zeit noch nicht ganz auf die Reihe
die richtige Formel anzuwenden.
Ist solange her mit der Schule => Grundwissen Mathematik.

Aber erstmal besten Dank. 

------------------
Gruß Jörn

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi Jörn,

Noch ein kleiner Nachtrag: Getboundingbox gibt dir die Maximalen Abmasse auch als 3d-Koordinaten zurück. Kannst ja mal ausprobieren.

Gruß, Carsten

[Diese Nachricht wurde von Carsten1210 am 28. Jan. 2007 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP