|
SolidWorks : SWX steuern mit Excel VBA
Scoopa am 22.09.2010 um 15:40 Uhr (0)
Hallo zusammen habe folgenden Tip ausprobiert. http://www.solidworkstips.com/content/index.php/api-tips/49-model-parameters-using-excel-vba Beim Debuggen bleibt man aber ständig an folgender Stelle hängen:Sub main() Set swApp = CreateObject("SldWorks.Application")Set Part = swApp.ActiveDocPart.Parameter("ShaftDia1@ Sketch1@bevelgear.Part ").SystemValue = 0.0254 in dieser Zeile bleit der Debugger hängen!?Part.Parameter("ShaftDia2@ Sketch1@bevelgear2.Part ").SystemValue = 0.0254Part.Parameter("BevDia1@ Sketc ...
|
| In das Form SolidWorks wechseln |
|
SolidWorks : SWX steuern mit Excel VBA
Scoopa am 23.09.2010 um 09:31 Uhr (0)
Habe das Musterbauteil bzw Baugruppe geöffnet.Ebenso habe ich die Verweise gesetzt.Daher wundert es mich, dass es nicht geht. Hat es bei Euch funktioniert?
|
| In das Form SolidWorks wechseln |
|
SolidWorks : SWX steuern mit Excel VBA
Scoopa am 23.09.2010 um 10:55 Uhr (0)
Vielen Dank für die Antwort.ja ich habe den Code kopiert. Diese Sonderzeichen habe ich aber nicht mit dabei. Evlt ist beim Upload was scheif gegangen.Hab den Code jetzt mal abgetippt und nicht kopiert.Der Debugger bleibt aber wieder an selber Stelle stehen.
|
| In das Form SolidWorks wechseln |
|
SolidWorks : SWX steuern mit Excel VBA
Scoopa am 23.09.2010 um 10:28 Uhr (0)
Hier nochmal der ganze Codedie Dateiendung von pdf auf xls ändern!Code:Option ExplicitDim part As ObjectDim swApp As ObjectPrivate Sub CommandButton1_Click()Set swApp = CreateObject("SldWorks.Application")Set part = swApp.ActiveDocpart.Parameter("ShaftDia1@ Sketch1@bevelgear.Part ").SystemValue = 0.0254part.Parameter("ShaftDia2@ Sketch1@bevelgear2.Part ").SystemValue = 0.0254part.Parameter("BevDia1@ Sketch1@bevelgear.Part ").SystemValue = 0.1016part.Parameter("BevDia2@ Sketch1@bevelgear2.Part ").SystemValu ...
|
| In das Form SolidWorks wechseln |
|
SolidWorks : Makro in Konstruktionstabelle - Methode fehlgeschlagen
Scoopa am 02.06.2010 um 23:10 Uhr (0)
Halloversuche gerade eine Konstruktionstabelle über eine Eingabeform zu steuern.Habe alles zuerst nur in Excel programmiert. Dort funktioniert es ohne weiteres.Nach dem Einfügen als Konstruktionstabelle in ein Bauteil in SW kommt im Modul an folgender Stelle: Dim sheet As Worksheet Dim lookupTable As Dictionary Set sheet = Sheets("Tabelle1") hier bleibt der Debugger immer hängen und bringtimmer folgenden fehler:Die Methode Sheets für das Objekt _Global ist fehlgeschlagenMir ist aufgefallen, dass beim ...
|
| In das Form SolidWorks wechseln |
