Hallo zusammen,
ich habe folgendes Problem:
Ich möchte eine eingebette Exceltabelle in einer Zeichnung mit vb.net bearbeiten.
Das funktioniert alles solange SolidWorks manuell geöffnet wurde und er auf diese Instance zurückgreift (getObject),
nur wenn ich SWX mit
CreateObject(ProgId:="SldWorks.Application.16")
starte kann ich das Excel-Object nicht mehr aktivieren.
Interessanterweise kann man dann die Exceltabelle in der Zeichnung auch nicht mehr mit der Maus aktivieren.
Hat jemand schon mal so eine Erfahrung gemacht und einen Rat?
swOleObj findet er noch aber xlObj ist immer Nothing!
Hier der Code:
For Each swOle In swOleObjs
Try
swOleObj = CType(swOle, SldWorks.SwOLEObject)
Dim myGuid1 As New Guid(swOleObj.Clsid)
txt = Type.GetTypeFromCLSID(myGuid1).ToString()
If LCase(txt).Contains("excel") Then
swOleObj.Select(True)
xlObj = CType(swOleObj.SetActive(True), Microsoft.Office.Interop.Excel.Workbook)
xlObj.Application.Visible = True
xlSheet = CType(xlObj.ActiveSheet, Excel.Worksheet)
xlSheet.Calculate()
swOleObj.SetActive(False)
'Microsoft.VisualBasic.MsgBox(txt)
End If
Catch ex As Exception
End Try
Next
------------------
Gruß weinel
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP