Sunday, December 24, 2017
In den Parametern eine VBA Funktion nutzen
In den Parametern eine VBA Funktion nutzen
In dem Parametern l�sst sich eine VBA-Function nutzen. Das ist in Zeiten von iLogic nicht mehr so wichtig (weil es �ber iLogic einfacher geht) aber wer wei�, f�r was man es doch mal brauchen kann ;)
So funktionierts:
In der Inventordatei (Dokumentprojekt) im VBA-Editor unter Functions die gew�nschte Funktion anlegen
Achtung: Inventor rechnet intern in cm also auch bei VBA Code, d.h. bei meiner Funktion wird der Wert Zahl1, obwohl er in den Parametern in mm ist, in cm �bergeben, also z.B. nicht 10mm sondern 1cm!
Auf die Funktion in den Parameter zugreifen
Syntax: Schl�sselwort VBA: <Functionname>(<�bergabewert>) [* 1mm da die Funktion einen Wert ohne Einheit zur�ck gibt]. In diesem Beispiel:
VBA:rechnen(Zahl1) * 1 mm
Hier der Funktionscode:
Public Function rechnen(Zahl1 As Double) As Double
Achtung: Inventor rechnet intern in cm also auch bei VBA Code.
Bei Parameter Zahl1 wird nicht 10mm sondern 1cm �bergeben
Zahl1 = Zahl1 * 10
MsgBox (Zahl1)
Select Case Zahl1
Case 10
rechnen = 100
Case 20
rechnen = 40
Case Is > 20
rechnen = 5
Case Else
rechnen = 1
MsgBox "R�ckgabe " & rechnen
End Select
End Function
Beispieldatei im Inventor 2018 Format herunterladen
Siehe auch:
- Arbeiten mit Parametern (1)
- Arbeiten mit Parametern (2)
- Arbeiten mit Parametern (3)
- Inventor automatisieren: Programmieranleitungen (VBA & API)
