Hallo
habe wieder einmal ein (Anfänger-) Problem.
Ich würde gern in Assembly-Modus einen WorkPoint auswählen.
Hierzu habe ich aus der Hilfe (SelectSimple) die Daten in VB kopiert.
Leider gibt Inventor immer die Fehlermeldung "Laufzeitfehler 91
Objektvariable oder With-Block-Variable nicht festgelegt" an.
Ich meine aber, dass ich diese gesetzt habe... oder vertue ich mich da :- )
Quelltext:
.
.
Private Sub SuchPunkt()
...
Dim oSelect As New clsSelect
Dim oWorkPoint As WorkPoint
Set oWorkPoint = oSelect.Pick(kWorkPointFilter)
...
End Sub
unter der Klasse clsSelect
Option Explicit
Private WithEvents oInteractEvents As InteractionEvents
Public Function Pick(filter As SelectionFilterEnum)
...
Set oInteractEvents = oApp.CommandManager.CreateInteractionEvents 'an dieser Stelle springt das Programm immer raus :- (
...
End Function
Danke :- )
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP