hm ich schaff es nciht das richtig einzufügen, vll kansnt du mir da helfen:
das ist mein makro:
Private Sub cb_Parameteraktualisieren_Click()
'X-Wert aus textbox wird an Catia übergeben
Dim Params As Parameters
Set Params = CATIA.ActiveDocument.Product.Parameters
Dim X As Dimension
Set X = Params.Item("X-Koordinate")
X.Value = Me.textbox_x.Value
Hier brauche ich die PAUSE
'Produkt wird aktualisiert und Punkt ausgerichtet
Set Params = CATIA.ActiveDocument.Product.Parameters
Dim W1 As Dimension
Set W1 = Params.Item("Winkel 1")
Me.textbox_Winkel1.Value = W1.Value
End Sub
wie muss das dann aussehen? bekomm es nicht hin...
achja und cool wäre noch eine hinweisbox oder messagebox "berechnung läuft" während der pause.
danke und schönes wee noch
grüße
|