January 11
Lavorare in modo più efficiente in SolidWorks utilizzando la capacità di Excel di tenere più valori e definire le relazioni funzionali tra i valori. Parametri SolidWorks di controllo, come i valori di quota, con le utility di VBA di Excel. Ad esempio, è possibile creare un assembly con un foglio di calcolo di Excel incorporato che consente di controllare le dimensioni della parte. È possibile modificare i valori delle celle nel foglio di calcolo incorporato e quindi fare clic su un pulsante di comando per eseguire una macro che aggiorna l'assemblea. Esplorare le molte opzioni per l'utilizzo di formule e funzioni di Excel con macro SolidWorks.
1 Aprire un assieme in SolidWorks. Fai clic destro sulla cartella "Annotazioni" nel "disegno FeatureManager" e selezionare "Mostra nomi della quota" per fornire un facile accesso a dimensioni specifiche.
2 Registrare una macro. Vai al menu "Visualizza" e selezionare "Barre degli strumenti" e poi "macro" per visualizzare la barra degli strumenti Macro. Fare clic sul pulsante "Record \ Pausa macro" sulla barra degli strumenti.
3 Eseguire solo le azioni che si desidera registrare. Doppio clic su ogni dimensione di aumentare il valore delle dimensioni, ad esempio di 0,5 pollici. Fare clic sul pulsante "Rebuild" o premere "Ctrl + B" per ricostruire il montaggio. Fare clic sul pulsante "Stop Macro" sulla barra degli strumenti macro per interrompere la macro.
4 Digitare un nome per la macro, come ad esempio "dimensioni", nel campo "Nome del file" nella nuova finestra di dialogo macro. Selezionare "SW macro VBA (* .swp)" in "Salva come" e cliccare su "Salva".
5 Fare clic sul pulsante "Modifica Macro" nella barra degli strumenti di macro e selezionare la nuova macro. Il codice dovrebbe includere qualcosa di simile a quanto segue:
Sub main ()
Set Swapp = CreateObject ( "SldWorks.Application")
Set Part = swApp.ActiveDoc
Part.SelectByID "Shaft1 @ @ Schizzo1 mygear-1 @ MyGearbox" ,.
Part.Parameter ( "Shaft1 @ @ Schizzo1 mygear.Part"). SystemValue = 0,0254
Part.SelectByID "Shaft2 @ @ Schizzo1 mygear2-1 @ MyGearbox" ,.
Part.Parameter ( "Shaft2 @ @ Schizzo1 mygear2.Part"). SystemValue = 0,0254
Part.SelectByID "MyDia1 @ @ Schizzo1 mygear-1 @ MyGearbox" ,.
Part.Parameter ( "MyDia1 @ @ Schizzo1 mygear.Part"). SystemValue = 0,1016
Part.SelectByID "MyDia2 @ @ Schizzo1 mygear2-1 @ MyGearbox",. Part.Parameter ( "MyDia2 @ @ Schizzo1 mygear2.Part"). SystemValue = 0,0762
Part.EditRebuild
Part.ClearSelection
End Sub
6 Eliminare ogni riga di codice che include il metodo "SelectByID" per ottimizzare la macro. La macro registrata selezionando la dimensione e cambiando il suo valore. Ma per questo esempio, non è necessario che il codice, in modo che provoca solo l'elaborazione non necessaria. Il codice modificato dovrebbe essere simile al seguente:
Sub main ()
Set Swapp = CreateObject ( "SldWorks.Application")
Set Part = swApp.ActiveDoc
Part.Parameter ( "Shaft1 @ @ Schizzo1 mygear.Part"). SystemValue = 0,0254
Part.Parameter ( "Shaft2 @ @ Schizzo1 mygear2.Part"). SystemValue = 0,0254
Part.Parameter ( "MyDia1 @ @ Schizzo1 mygear.Part"). SystemValue = 0,1016
Part.Parameter ( "MyDia2 @ @ Schizzo1 mygear2.Part"). SystemValue = 0,0762
Part.EditRebuild
Part.ClearSelection
End Sub
7 Aprire un foglio di calcolo Excel e compilare le celle per i valori che si desidera controllare. Aggiungere un pulsante per il foglio di calcolo per attivare una macro all'interno di Excel. Vai al menu "Visualizza", selezionare "Barre degli strumenti" e poi cliccare su "Strumenti di controllo". Selezionare l'opzione "pulsante di comando" e quindi fare clic nella finestra di foglio di calcolo in cui si desidera inserire il pulsante di comando.
8 Vai a SolidWorks e copiare tutto il codice di macro tra i "Sub Main ()" e "End Sub" linee di la macro registrata.
9 Tornare al foglio di calcolo Excel e fare doppio clic sul nuovo pulsante di comando o il tasto destro del mouse sul pulsante e selezionare "Visualizza codice". Incollare il codice copiato da SolidWorks sopra la linea "End Sub".
10 Modificare il codice come segue per accedere ai valori di Excel.
Private Sub CommandButton1_Click ()
Set Swapp = CreateObject ( "SldWorks.Application")
Set Part = swApp.ActiveDoc
Part.Parameter ( "Shaft1 @ @ Schizzo1 mygear.Part"). SystemValue = Excel.Range ( "B1")
0,0254
Part.Parameter ( "MyDia1 @ @ Schizzo1 mygear.Part"). SystemValue = Excel.Range ( "B2") 0,0254
Part.Parameter ( "Shaft2 @ @ Schizzo1 mygear2.Part"). SystemValue = Excel.Range ( "B3") 0,0254
Part.Parameter ( "MyDia2 @ @ Schizzo1 mygear2.Part"). SystemValue = Excel.Range ( "B4") 0,0254
Part.EditRebuild
Part.ClearSelection
End Sub
11 Copia e incolla il foglio di calcolo di Excel nel gruppo in modo da un file esterno non controlla il modello. Selezionare tutte le celle richieste e premere "Ctrl + C" per copiare le celle. Rientro in SolidWorks di montaggio e premere "Ctrl + V" per incollare le celle copiate. Ora, chiudere o cancellare il file di Excel. Il foglio di calcolo è incorporato nel gruppo in modo che non è necessario il file.
12 Fare doppio clic sul foglio di lavoro incorporato per attivare il foglio di calcolo. Modificare i valori delle celle e fare clic sul pulsante di comando foglio di calcolo per aggiornare l'assieme. Fare clic all'esterno della finestra di foglio di calcolo incorporato per disattivare e tornare al montaggio.