Ja das es über vba geht kann ich mir vorstellen
ich hab es jetzt gefunden wie es lauten muss, du warst na dran
SendKeys.SendWait("0,0")
SendKeys.SendWait("{ENTER}")
Vielen Dank für deine Hilfe Georg
Aber wie ich die Baugruppe nach den Achse ausrichte weist du nicht oder?
Fals es jemand interessiert, hier mein kompletter Code:
Imports Inventor
Imports System.Windows.Forms
Module Module1
Public ThisApplication As Inventor.Application
Public oDoc As Inventor.Document
Public oProj As Inventor.DesignProject
Sub main()
ThisApplication = GetObject(, "Inventor.Application")
oDoc = ThisApplication.ActiveDocument
oDoc.SelectSet.Select(oDoc.ComponentDefinition.WorkPlanes.Item(3))
ThisApplication.CommandManager.ControlDefinitions.Item("AssemblyHalfSectionViewCmd").Execute()
'Abstand
SendKeys.SendWait("0,0")
SendKeys.SendWait("{ENTER}")
MsgBox("OKAY")
End Sub
End Module
------------------
----------------------------------
Mit freundlichen Grüßen
Felix
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP