Arbeta mer effektivt i SolidWorks genom att utnyttja Excels förmåga att hålla flera värden och definiera funktionellt förhållande mellan värden . Kontroll SolidWorks parametrar såsom dimensionsvärden , med Excel VBA verktyg. Till exempel kan du skapa en enhet med en inbäddad Excel-ark som gör att du kan styra en del dimensioner . Du kan ändra cellvärdena i den inbäddade kalkylbladet och sedan klicka på en knapp för att köra ett makro som uppdaterar enheten . Utforska de många alternativ för att använda Excel formler och funktioner med SolidWorks makro . Instruktioner
1
Öppna en församling i SolidWorks . Högerklicka på " Anteckningar " -mappen i " designträdet tree " och välj " Visa Dimension Names " för att ge enkel tillgång till specifika mått .
2
spela in ett makro . Gå till menyn "Visa" och välj " Verktygsfält " och sedan " Macro " för att visa Macro Toolbar . Klicka på " Record \\ Paus Macro " -knappen på verktygsfältet .
3
Utför bara de åtgärder som du vill spela in . Dubbelklicka på varje dimension för att öka värdet av dimensionerna , exempelvis med 0,5 inches . Klicka på " Bygg ", eller tryck " Ctrl + B " för att återskapa sammanställningen . Klicka på "Stop Macro " -knappen på Makro verktygsfältet för att stoppa makrot .
4
Skriv ett namn på makrot , till exempel " dimensioner" i " File Name "-fältet i nytt makro dialogrutan . Välj " SW VBA-makron ( * . SWP ) " i " Spara som" och klicka på " Spara ".
5
Klicka på " Redigera Macro " -knappen på Makro verktygsfältet och välj din nya makrot . Koden bör innehålla något som liknar följande :
Sub main ( ) katalog
Set Swapp = CreateObject ( " SldWorks.Application " ) Set Part = swApp.ActiveDocPart.SelectByID = 0.0254Part.SelectByID = 0.0254Part.SelectByID = 0.1016Part.SelectByID " MyDia2 @ Skiss1 @ mygear2 - 1 @ MyGearbox " , . Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0762Part.EditRebuildPart.ClearSelectionEnd Sub
6
Radera varje kodrad som innehåller " SelectByID " metod för att optimera din makro. Makrot inspelade välja dimensionen och ändra dess värde . Men för detta exempel , behöver du inte den koden , så det bara orsakar onödig behandling . Den redigerade koden ska vara ungefär följande :
Sub main ( ) katalog
Set Swapp = CreateObject ( " SldWorks.Application " ) Set Part = swApp.ActiveDocPart.Parameter ( " Shaft1 @ Sketch1@mygear.Part " ) . SystemValue = 0.0254Part.Parameter ( " Shaft2 @ 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
Öppna ett Excel-ark och fyll cellerna för de värden du vill styra . Lägg till en knapp i kalkylbladet för att aktivera ett makro i Excel . Gå till menyn "Visa" , välj " Verktygsfält " och klicka sedan på "Control Toolbox . " Välj " Command Button " och klicka sedan på kalkylbladet fönster där du vill infoga kommandot knappen .
8
Gå till SolidWorks och kopiera alla makrokoden mellan " Sub main ( ) " och " End Sub " linjer av din inspelade makrot .
9
tillbaka till Excel och dubbelklicka på den nya kommandoknappen eller högerklicka på knappen och välj " Visa kod . " Klistra in koden du kopierade från SolidWorks ovanför " End Sub " linje .
10
Ändra koden på följande sätt för att komma åt Excel värdena .
Private Sub CommandButton1_Click ( ) Set Swapp = CreateObject ( " SldWorks.Application " ) Set Part = swApp.ActiveDocPart.Parameter ( " Shaft1 @ Sketch1@mygear.Part " ) . SystemValue = Excel.Range ( " B1 " ) * 0.0254Part.Parameter ( " MyDia1 @ Sketch1@mygear.Part " ) . SystemValue = Excel.Range ( " B2 " ) * 0.0254Part.Parameter ( " Shaft2 @ Sketch1 @ mygear2.Part " ) . SystemValue = Excel.Range ( " B3 " ) * 0.0254Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = Excel.Range ( " B4 " ) * 0.0254Part . EditRebuildPart.ClearSelectionEnd Sub
11
Kopiera och klistra in Excel-kalkylblad i aggregatet så en extern fil inte styra modellen . Markera alla önskade celler och tryck " Ctrl + C " för att kopiera cellerna . Återgå till SolidWorks montering och tryck " Ctrl + V " för att klistra in de kopierade cellerna . Nu , antingen stänga eller ta bort Excel-fil . Den kalkylbladet är inbäddad i enheten så att du inte behöver filen . Dubbelklicka på det inbäddade kalkylarket att aktivera kalkylbladet
12
. Ändra cellvärden och klicka på knappen kalkylblad kommandot för att uppdatera enheten . Klicka utanför det inbäddade kalkylarket fönstret för att avaktivera och återgå till monteringen .
