Guten Morgen Franz,
ich hätte mich vielleicht ein wenig deutlicher Ausdrücken sollen.
Das geht natürlich immer noch mit doppelklick aber wie im Thema Beschrieben soll es mit API Code automatisiert werden.
Sub main()
'Wenn das Makro aus SWX
heraus gestartet wird, muss vorher
'ein anderes Fenster den Focus haben, damit es funktioniert.
'Am einfachsten erledigen wir das mit einer Messagebox
MsgBox "Makro geladen und bereit ...."
Set swApp = CreateObject("SldWorks.Application")
Set Drawing = swApp.ActiveDoc
Drawing.EditSketch
Drawing.EditSketch
Drawing.EditSketch
'----------------------------------------------------------
'in Drawing eingelagerte Excel Tabelle öffnen und regenerieren
'----------------------------------------------------------
Drawing.SelectByID "Tabelle", "OLEITEM", 0.263818018018, 0.2801504504505, 0
swApp.ActiveDoc.ActiveView.FrameState = 1
SendKeys "^+Q+{ENTER}", True ' Daten regenerieren
Drawing.EditRebuild
Drawing.CloseFamilyTable ' Tabelle schließen
swApp.ActiveDoc.ActiveView.FrameState = 1
Drawing.EditRebuild ' Teil neu aufbauen
Drawing.ClearSelection
Drawing.EditSketch
End Sub
Nur leider funkt es nicht so richtig und da ich kein VB Spezi bin versuche ich es halt mit basteln und hoffe auf eure Hilfe.
Vielen Dank im voraus

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