Hallo,
ich bin neu hier und benötige Hilfe beim abhängigen Bemaßen eines Winkels. Es geht um das Ab-/Aufwickeln einer Kabelführung, die bis zu 100° der einen Gesetzmäßigkeit folgt und ab 100° der anderen (Aufwickeln/Abwickeln).
Der Winkel ist abhängig von 4 anderen Parametern. Das heißt ich bräuchte eine Funktion in Form
Code:
if x < 100 then Berechnung_für_Fall_1
else Berechnung_für_Fall_2
Leider habe ich bisher keinerlei Erfahrungen mit VBA in Verbindung mit Inventor (Programmieren und VBA an sich sind nicht das Problem).
Gemäß eines anderen Threads hier im Forum habe ich folgendes in die "Functions" des betreffenden Bauteils eingetragen:
Code:
Public Function y(d0 As Double, d7 As Double, d25 As Double, d26 As Double) As DoubleIf d25 <= 100 Then y = (1450 - PI * d0 - d25 * PI / 180 * d7) * 180 / PI / (d26 + d7)
Else: y = 360 - (1450 - PI * d0 - (d25) * PI / 180 * d7) * 180 / PI / (d26 + d7)
End Function
Nun wollte ich diese Funktion in der Skizze als Bemaßung verwenden mit dem Befehl:
VBA: y(d0,d7,d25,d26)
Inventor quittiert das mit "Der Ausdruck kann nicht ausgewertet werden.". Könnte das an den Einheiten liegen (ich brauche grd als Ergebnis, Eingabeparameter sind mm und grd) oder was habe ich falsch gemacht?
Vielen Dank im Voraus!
Gruß
Edit: Ich nutze Inventor 2016 unter Windows 7 x64.
[Diese Nachricht wurde von Bonestorm am 04. Apr. 2016 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP