Workbench wechseln bzw abfragen (Dassault Systemes - PLM Solutions/CATIA V5 Programmierung)


	CATIA V5 Grundkurs \| Einsteiger - 5 Std. 15 Min 48

	Schnell, effizient und günstig: Mit der Kisters 3DViewStation 3D Arbeits- und Reparaturanleitungen einfach erstellen und pflegen, eine Pressemitteilung Meldungen abonnieren
Autor	Thema: Workbench wechseln bzw abfragen (3063 mal gelesen)
Baldi Mitglied Designer Beiträge: 13 Registriert: 13.12.2005	erstellt am: 21. Dez. 2005 15:54 <-- editieren / zitieren --> Unities abgeben: Hallo zusammen! ich hab ein makro erstellt dass ein part öffnet und anschließend die workbench wechselt. das problem ist nun wenn diese workbench vorher schon aktiv war wird durch das workbench wechseln noch ein neues part erzeugt (einfach den code unten 2x ausführen). wie kann man verhindern dass noch ein part erzeugt wird? ist mein workbench wechsel falsch? oder wie kann man die aktuelle workbench abfragen? Sub CATMain() Dim documents1 As Documents Set documents1 = CATIA.Documents Dim partDocument1 As PartDocument Set partDocument1 = documents1.Add("Part") CATIA.StartWorkbench "PrtCfg" 'partDocument1.Close End Sub Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
Filippo Mitglied CAx-Systemverwalter Beiträge: 168 Registriert: 09.11.2003	erstellt am: 21. Dez. 2005 21:40 <-- editieren / zitieren --> Unities abgeben: Nur für Baldi Hallo Baldi, probiere mal so. Sub CATMain() Dim documents1 As Documents Set documents1 = catia.Documents Dim partDocument1 As PartDocument Set partDocument1 = documents1.Add("Part") If catia.GetWorkbenchId <> "PrtCfg" Then catia.StartWorkbench "PrtCfg" End If 'partDocument1.Close End Sub Ciao Filippo Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)