|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
10.12.2011 07:30:00 |
Heisi |
|
|
|
10.12.2011 15:16:17 |
Till |
|
|
|
10.12.2011 17:50:55 |
Heisenberg |
|
|
 Pause zwischen 2 Befehlen ohne System anzuhalten |
10.12.2011 19:30:25 |
Till |
|
|
|
10.12.2011 21:09:44 |
Heisenberg |
|
|
|
10.12.2011 22:28:56 |
Till |
|
|
|
11.12.2011 04:48:27 |
Heisi |
|
|
|
11.12.2011 16:21:23 |
Till |
|
|
|
11.12.2011 21:00:59 |
heisenberg |
|
|
|
12.12.2011 00:55:09 |
Till |
|
|
|
12.12.2011 09:45:52 |
Gast96144 |
|
|
|
12.12.2011 12:54:58 |
Heisenberg |
|
|
|
12.12.2011 14:22:19 |
Till |
|
|
|
12.12.2011 16:58:34 |
Heisenberg |
|
|
|
12.12.2011 20:14:32 |
Till |
|
|
|
12.12.2011 20:41:47 |
Gast24065 |
|
|
|
12.12.2011 22:36:13 |
Till |
|
|
|
13.12.2011 00:59:38 |
heisenberg |
|
|
Von:
Till |
Datum:
10.12.2011 19:30:25 |
Views:
970 |
Rating:
|
Antwort:
|
Thema:
Pause zwischen 2 Befehlen ohne System anzuhalten |
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
Load UserForm1
UserForm1.Show (False)
wait DateAdd("s", 2, Now())
Unload UserForm1
'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
Private Sub wait(t As Date)
While t > Now(): DoEvents: Wend
End Sub
Die Userform musst du selber bauen... irgendein Textfeld rein, kannst auch versuchen einen Statusbar zu basteln...
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
|
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
10.12.2011 07:30:00 |
Heisi |
|
|
|
10.12.2011 15:16:17 |
Till |
|
|
|
10.12.2011 17:50:55 |
Heisenberg |
|
|
Pause zwischen 2 Befehlen ohne System anzuhalten |
10.12.2011 19:30:25 |
Till |
|
|
|
10.12.2011 21:09:44 |
Heisenberg |
|
|
|
10.12.2011 22:28:56 |
Till |
|
|
|
11.12.2011 04:48:27 |
Heisi |
|
|
|
11.12.2011 16:21:23 |
Till |
|
|
|
11.12.2011 21:00:59 |
heisenberg |
|
|
|
12.12.2011 00:55:09 |
Till |
|
|
|
12.12.2011 09:45:52 |
Gast96144 |
|
|
|
12.12.2011 12:54:58 |
Heisenberg |
|
|
|
12.12.2011 14:22:19 |
Till |
|
|
|
12.12.2011 16:58:34 |
Heisenberg |
|
|
|
12.12.2011 20:14:32 |
Till |
|
|
|
12.12.2011 20:41:47 |
Gast24065 |
|
|
|
12.12.2011 22:36:13 |
Till |
|
|
|
13.12.2011 00:59:38 |
heisenberg |
|
|