Effizienter arbeiten in SolidWorks unter Verwendung von Excel Fähigkeit, mehrere Werte enthalten und definieren funktionalen Beziehungen zwischen den Werten . Steuerung SolidWorks Parameter wie Merkmalsausprägung mit Excel VBA Versorgungsunternehmen. Zum Beispiel können Sie eine Assembly mit einem eingebetteten Excel-Tabelle , die Sie zur Teilnahme Dimensionen steuern zu erstellen. Sie können die Zelle Werte in dem eingebetteten Arbeitsblatt und klicken Sie dann auf einen Befehl , um ein Makro, das die Montage Updates ausgeführt. Entdecken Sie die vielen Möglichkeiten für die Verwendung von Excel-Formeln und Funktionen mit SolidWorks Makro. Anleitung
1
Öffnen einer Baugruppe in SolidWorks . Rechten Maustaste auf den " Anmerkungen " im Ordner " FeatureManager " und wählen Sie "Show Dimension Names" einen einfachen Zugang zu spezifischen Dimensionen liefern .
2
ein Makro aufzeichnen . Zum Menü "Ansicht" und wählen Sie " Symbolleisten" und dann auf " Makro ", um die Makro -Symbolleiste anzuzeigen. Klicken Sie auf den "Record \\ Pause Macro "-Button in der Symbolleiste.
3
Führen Sie nur die Aktionen, die Sie aufzeichnen möchten. Doppelklicken Sie auf jede Dimension , um den Wert der Dimensionen , z. B. durch 0,5 Zoll zu erhöhen. Klicken Sie auf die "Rebuild " oder drücken Sie " Strg + B " , um die Baugruppe wieder aufzubauen. Klicken Sie auf den "Stop Macro" -Taste auf der Makro- Symbolleiste, um das Makro zu stoppen.
4
Geben Sie einen Namen für das Makro , wie " Dimensionen " im " File Name" -Feld in der New Macro Dialogfeld . Wählen Sie " SW VBA -Makros (*. Swp ) " in " als Dateityp " und klicken Sie auf "Speichern".
5
Klicken Sie auf den "Edit Macro" -Taste auf der Makro- Symbolleiste, und wählen Sie Ihr neues Makro. Der Code sollte etwas Ähnliches wie die folgenden :
Sub main ()
Set SwAPP = CreateObject (" SldWorks.Application " ) Set Part = swApp.ActiveDocPart.SelectByID = 0.0254Part.SelectByID = 0.0254Part.SelectByID = 0.1016Part.SelectByID " MyDia2 @ @ Skizze1 mygear2 -1 @ MyGearbox " . Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0762Part.EditRebuildPart.ClearSelectionEnd Sub
6
Löschen Sie jede Codezeile, die die " SelectByID " Verfahren umfasst zur Optimierung Ihrer Makro. Das Makro aufgezeichnet Auswahl der Dimension und seinen Wert zu verändern . Aber für dieses Beispiel , brauchen Sie nicht , dass Code , so dass es nur verursacht unnötige Verarbeitung . Die bearbeitete Code sollte ähnlich der folgenden :
Sub main ()
Set SwAPP = CreateObject (" SldWorks.Application " ) Set Part = swApp.ActiveDocPart.Parameter ( " Welle1 @ Sketch1@mygear.Part " ) . SystemValue = 0.0254Part.Parameter ( " Welle 2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0254Part.Parameter ( " MyDia1 @ Sketch1@mygear.Part " ) . SystemValue = 0,1016 Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0762Part.EditRebuildPart.ClearSelectionEnd Sub
7
Öffnen Sie eine Excel-Tabelle und füllen Zellen für die Werte, die Sie steuern möchten . Fügen Sie eine Schaltfläche in das Arbeitsblatt ein Makro in Excel zu aktivieren. Zum Menü "Ansicht" die Option "Symbolleisten" und klicken Sie dann auf "Control Toolbox. " Wählen Sie den " Command Button "-Option und klicken Sie dann in der Tabelle , an der Sie die Befehlsschaltfläche einfügen möchten.
8
zu SolidWorks und kopieren Sie alle Makro-Code zwischen dem "Sub main () " und " End Sub " Linien Ihres aufgezeichneten Makros .
9
zurück zur Excel-Tabelle und doppelklicken Sie auf die neue Schaltfläche oder auf die Schaltfläche mit der rechten Maustaste und wählen Sie " Code anzeigen. " Fügen Sie den Code, den Sie von SolidWorks über dem "End Sub " Linie kopiert.
10
Ändern Sie den Code wie folgt zugreifen die Excel -Werte .
private Sub CommandButton1_Click () Set SwAPP = CreateObject (" SldWorks.Application " ) Set Part = swApp.ActiveDocPart.Parameter ( " Welle1 @ Sketch1@mygear.Part " ) . SystemValue = Excel.Range ( "B1" ) * 0.0254Part.Parameter ( " MyDia1 @ Sketch1@mygear.Part " ) . SystemValue = Excel.Range ( "B2" ) * 0.0254Part.Parameter ( " Welle 2 @ @ Skizze1 mygear2.Part " ) . SystemValue = Excel.Range ( " B3 " ) * 0.0254Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = Excel.Range ( " B4 " ) * 0.0254Part . EditRebuildPart.ClearSelectionEnd Sub
11
Kopieren Sie die Excel-Tabelle in die Baugruppe so einer externen Datei wird nicht die Kontrolle des Modells. Wählen Sie alle benötigten Zellen und drücken Sie "Strg + C " , um die Zellen zu kopieren. Zurück zur SolidWorks Montage und drücken Sie "Strg + V ", um die kopierten Zellen einfügen. Nun , entweder schließen oder löschen Sie die Excel-Datei. Die Tabelle wird in die Assembly eingebettet , so dass Sie nicht brauchen die Datei.
12
Doppelklicken Sie auf das eingebettete Arbeitsblatt , um die Tabelle zu aktivieren. Ändern Sie die Zelle Werte und klicken Sie auf die Schaltfläche Tabelle , um die Montage zu aktualisieren. Klicken Sie außerhalb des eingebetteten Arbeitsblatt Fenster zu deaktivieren und zur Montage.