Autor
|
Thema: Makros aus Makro heraus ausführen (3814 mal gelesen)
|
studmija Mitglied Student
Beiträge: 49 Registriert: 22.11.2010 System: Microsoft Windows XP Professional x64 Edition Version 2003 Sevice Pack 2 Computer: Intel(R)Xeon(R)CPU 2,80GHz, 12 GB RAM Software: CATIA V5R19
|
erstellt am: 02. Dez. 2010 14:06 <-- editieren / zitieren --> Unities abgeben:
Servus, kann man Makros aus einem Makro heraus starten? Ich habe mehrere "kleinere" Makros geschrieben & will diese nacheinander ausführen. Hatte an sowas in der Art gedacht: Code:
Sub CATMain ()Makro1 (evtl. weitere Anweisungen) Makro2 (evtl. weitere Anweisungen) Makro3 usw. ... End Sub
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Christian.O Mitglied Konstrukteur
Beiträge: 1212 Registriert: 17.07.2009
|
erstellt am: 02. Dez. 2010 18:41 <-- editieren / zitieren --> Unities abgeben: Nur für studmija
Servus, entweder so Code: Private Sub cmd_Change_Balloon_Propterties_Click() ' Makroaufruf: Change_Balloon_Propterties '***Fenster schließen Unload Me '***Fenster anzeigen / vbModeless damit man bei geöffneter Userform etwas selektieren kann Change_Balloon_Propterties.Show vbModeless End Sub
oder so Code: Private Sub cmd_Rename_Object_Click() ' Makroaufruf: Rename_Object '***Fenster schließen Unload Me '***Deklarationen für Function-Aufruf strProjekt = "OC_GUI.catvba" strMakro = "Rename_Object" strMakrostart = "CatMain" strProjektpfad = strOC_Pfad & "\" & strProjekt '***Function aufrufen Run_CatVBA strProjektpfad, strMakro, strMakrostart End Sub
Code: Public Sub Run_CatVBA(strPfad As String, strMakro As String, strMakrostart As String) '***Deklarationen Dim vntParameter() As Variant Dim vntSystemService As Variant '***Makro aufrufen Set vntSystemService = CATIA.SystemService Call vntSystemService.ExecuteScript(strPfad, catScriptLibraryTypeVBAProject, strMakro, strMakrostart, vntParameter) End Sub
Beim ersten Code wird eine Userform innerhalb eines VBA Projects aufgerufen. Beim 2ten wird ein Modul innerhalb eines VBA Projects aufgerufen. Gestartet wird hierbei eine Userform mit allen Buttons welche dann die Makros (Modul oder Userform) aufruft. Wenn ein Modul aufgerufen wird werden alle Parameter übergeben, damit das Makro gestartet wird.
------------------ Mit freundlichen Grüßen aus Tirol Christian Obholzer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
studmija Mitglied Student
Beiträge: 49 Registriert: 22.11.2010 System: Microsoft Windows XP Professional x64 Edition Version 2003 Sevice Pack 2 Computer: Intel(R)Xeon(R)CPU 2,80GHz, 12 GB RAM Software: CATIA V5R19
|
erstellt am: 08. Dez. 2010 08:34 <-- editieren / zitieren --> Unities abgeben:
Moin! Hmmm irgendwie kann ich mit diesen Code nicht so wiel anfangen Ich schreibe meine Makros in CATScript! Habe mehrere Makros in einer Macro Library, die nach einander ausgeführt mein "Wunschergebnis" erzielen. Hatte an einen Befehl gedacht bei den man den "Pfad" und "Namen" vom auszuführenden Makro angibt... MfG Micha Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bertel Mitglied
Beiträge: 300 Registriert: 03.04.2002 CATIA V5 R26SP3HF21 Win10 Lenovo P52 Intel Xenon 16GB Ram NVIDIA Quadro P2000 EUKLID V14 ViCADo 2015
|
erstellt am: 08. Dez. 2010 08:38 <-- editieren / zitieren --> Unities abgeben: Nur für studmija
|
studmija Mitglied Student
Beiträge: 49 Registriert: 22.11.2010 System: Microsoft Windows XP Professional x64 Edition Version 2003 Sevice Pack 2 Computer: Intel(R)Xeon(R)CPU 2,80GHz, 12 GB RAM Software: CATIA V5R19
|
erstellt am: 08. Dez. 2010 13:44 <-- editieren / zitieren --> Unities abgeben:
|