---

WendelimKreis.pdf

Hallo,

hat jemand vielleicht eine Idee, wie man aufgrund der angehängten Anleitung so eine Kurve in Excel mittels parametrischen Gleichungen beschreiben und letztendlich in Inventor erstellen kann, damit man schön die Geometriewerten über Excel ändern und solche Kurve steuern kann?

Gruß Kristof

[Diese Nachricht wurde von inv-Kristof am 09. Apr. 2005 editiert.]

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

---

Hallo Kristof

Bemühe mal die Suche. Wir hatten solche Wendeln schon mal....

------------------
Der vernünftige Mensch paßt sich der Welt an;
der unvernünftige besteht auf dem Versuch, die Welt sich anzupassen.

Deshalb hängt aller Fortschritt vom unvernünftigen Menschen ab.
(George Bernard Shaw)

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

---

diese Anleitung habe ich ja eben aus dem alten Beitrag. Die Konstruktionsmethoden solcher Kurve kenne ich auch. Nun möchte ich das jetzt gerne mit Excel machen mittels den matematischen Gleichungen.

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

---

helix.zip

Hi Kristof,

bin mir zwar nicht ganz sicher, worauf du genau hinaus möchtest,
im Anhang mal ein 'Uralt-File', wo ich mir damals mal paar Hilfsformeln
erstellt hatte, ist nix besondres also nicht lachen ;-)
Übrigens bei 5. Raumradien/Steigung/Abwicklung/etc war ich mir nie ganz so sicher,
ob das korrekt ist/war, hat aber zumindest für meine Zwecke damals annäherungsweise hingehauen,
naja und in Geometrie musste ich immer die Kreide holen;-)

lg Nancy

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

---

danke Nancy für deine Mühe, mir geht es aber eher um die Generierung der solchen Kurve im Inventor, die matematisch im Excel beschrieben wird, und dann gesteuert werden kann. Man braucht dazu z.B diese Gleichungen, die in der Anleitung stehen. nun weiss ich nicht wie ich diese im Excel zusammenfassen soll.

Gruß Kristof

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

---

Hi Kristof,

schau Dir mal das File da an unter:
Punkt 84 -  Kreis aus 3 Punkten http://michael-schwimmer.de/xlMain.htm

Ist zwar nicht für Wendeln & Co, aber vielleicht nützt es trotzdem was;-)

Gruss Nancy

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

---

3D.JPG

Hallo Nancy,

diese Seite ist hervorragend. Nun habe ich zu wenig Erfahrung mit dem Makro- Schreiben im Excel und mit diesem Kreis ist es schon zu komplieziert für mich. Und mein Fall basiert auf 3D- Geometrie, noch kompliezierter. ich überlege mir grade ob man im Excel ein Makro schreiben kann, aus dem zumindest die 3D- Punkte für diese Kurve irgendwie im Inventor hinkriegen kann. Die Verbindung selbst dieser Punkte könnte ich schon von Hand machen mittels 3D- Spline. Dam muss ich wahrscheinlich die Makro-Fachmänner danach fragen.
Diese Kurve habe ich schon mit Matlab hingekriegt, das war ganz simple. es hilft mir aber nix weiter.
Gruß Kristof

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

---

Abend nochmal Kristof,

naja, also wenn man einmal die Punkte im 2D hat,
ist doch z eigentlich nur noch eine Frage der Höhenzuweisungen,
oder? Oder mach ich's mir da jetzt zu einfach?

Ich weiss ja nicht wie IV das intern händelt, also was die Helix da
für ein Object ist, und in Acad siehts ja mit Wendeln eh finster aus,
ich hab jetzt aber einfach mal probiert, anhand der Kreis.xls eine
3DPolyline in Acad zu erzeugen. Die Z Koordinaten hab ich einfach mal aus
dem Zähler i genommem;-) Achja, ist kein Errorhandler drinne und Acad sollte gestartet sein;-)

lg Nancy

Code:

---

Option Explicit
Sub just_a_test()
  Dim points#(110), i%, k%
  For i = 0 To 36
    points(k) = Cells(i + 22, 2) 'x
    points(k + 1) = Cells(i + 22, 3) 'y
    points(k + 2) = CDbl(i) 'z - hier einfach mal i selber;-)
    k = k + 3
  Next
  Dim ac As Object, pline As Object
  'autocad muss gestartet sein
  Set ac = GetObject(, "Autocad.application")
  Set pline = ac.activedocument.modelspace.Add3DPoly(points)
  ac.zoomextents
End Sub

---

 

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

---

ImportCoord für Inventor könnte helfen - siehe: http://www.aac-solutions.cz/apps/importcoord/

Vladimir Michl

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