auch nach langer Suche konnte ich keine Lösung für mein Problem finden:
Ich öffne mit VBA in Excel eine CAD Datei und damit auch das Programm CATIA und möchte nun warten bis dieser Vorgang abgeschlossen ist. Danach möchte ich dann weitere Befehle schicken.
Mein Problem ist, dass ich nicht weiß wie ich das Warten lösen soll. Eine Wartezeit kommt nicht in Frage, da das Programm oft sehr unterschiedliche Startup Zeiten hat, es muss also irgendwie mit der Prozessaktivität machbar sein.
Hat hier jemand eine Lösung für das Problem:
Sub main()
Dim sheetdonnee As Worksheet
Dim strPfad As String
strPfad = ThisWorkbook.Path
Set sheetdonnee = ThisWorkbook.Sheets("Calculation")
If sheetdonnee.Cells(42, 18) = 1 Then
ThisWorkbook.FollowHyperlink strPfad & "\" & "assemblage.CATProduct"
End If
If sheetdonnee.Cells(42, 18) = 2 Then
ThisWorkbook.FollowHyperlink strPfad & "\" & "assemblage2.CATProduct"
End If
Warten bis Datei im Programm "CATIA" fertig geladen ist
Application.SendKeys ("^U")
Danke für eure Hilfe und Grüße
Manuel