Trabalhar de forma mais eficiente no SolidWorks , utilizando a capacidade do Excel para armazenar vários valores e estabelecer relações funcionais entre os valores. Parâmetros do SolidWorks controle, tais como valores de dimensão , com utilitários de VBA do Excel . Por exemplo , você pode criar uma montagem com uma planilha do Excel incorporado que permite o controle de dimensões da peça. Você pode alterar os valores das células na planilha incorporado e , em seguida, clicar em um botão de comando para executar uma macro que atualiza a montagem. Explore as muitas opções para utilizar fórmulas e funções do Excel com o SolidWorks macro. Instruções
1

Abra uma montagem no SolidWorks. Botão direito do mouse na pasta " Anotações " no " árvore de projetos do FeatureManager " e selecione " Mostrar nomes de dimensões " para facilitar o acesso a dimensões específicas.
2

Gravar uma macro. Vá para o menu "View " e selecione " Barras de Ferramentas " e depois " Macro " para exibir a barra de ferramentas Macro . Clique no botão "Record \\ Pause Macro" na barra de ferramentas .
3

Execute apenas as ações que você deseja gravar. Clique duplo cada dimensão para aumentar o valor das dimensões , por exemplo de 0,5 polegadas . Clique no botão " Rebuild" ou pressione "Ctrl + B" para reconstruir a montagem. Clique no botão " Parar Macro" na barra de ferramentas Macro para parar a macro.
4

Digite um nome para a macro, tais como "dimensões ", no campo " Nome do arquivo " no Novo Macro caixa de diálogo . Selecione "SW VBA Macros (*. SWP ) " em " Salvar como tipo" e clique em " Salvar".
5

Clique no botão "Editar Macro" na barra de ferramentas Macro e selecione sua nova macro. O código deve incluir algo semelhante ao seguinte :

Sub main ()

Set Swapp = CreateObject (" SldWorks.Application " ) Set Parte = swApp.ActiveDocPart.SelectByID = 0.0254Part.SelectByID = 0.0254Part.SelectByID = 0.1016Part.SelectByID " MyDia2 @ Sketch1 @ mygear2 -1 @ MyGearbox " . Part.Parameter ( " MyDia2 @ Sketch1@mygear2.Part " ) . SystemValue = 0.0762Part.EditRebuildPart.ClearSelectionEnd Sub
6

Exclua cada linha de código que inclui o método " SelectByID " para otimizar sua macro. A macro gravada selecionando a dimensão e alterando o seu valor. Mas para este exemplo, não é necessário que o código , por isso só faz com que o processamento desnecessário. O código editado deve ser semelhante ao seguinte:

Sub main ()

Set Swapp = CreateObject (" SldWorks.Application " ) Set Parte = 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

Abra uma planilha do Excel e preencher células para os valores que você deseja controlar . Adicionar um botão para a planilha para ativar uma macro dentro do Excel . Vá para o menu "View ", selecione " Barras de ferramentas" e clique em " Control Toolbox ". Selecione a opção "Botão de comando" e , em seguida, clique na janela da planilha onde você deseja inserir o botão de comando.
8

Ir para SolidWorks e copiar todo o código de macro entre os " Sub Main () " e " End Sub" linhas de sua macro gravada .
9

Retornar para a planilha do Excel e clique duas vezes o novo botão de comando ou clique com o botão direito do mouse no botão e selecione "View Code ". cole o código copiado do SolidWorks acima da linha " End Sub " .
10

Modifique o código da seguinte forma para o acesso os valores do Excel.

Private Sub CommandButton1_Click () Set Swapp = CreateObject (" SldWorks.Application " ) Set Parte = 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

Copiar e colar a planilha do Excel para o conjunto assim um arquivo externo não está controlando o modelo . Selecione todas as células necessárias e pressione "Ctrl + C " para copiar as células. Voltar para a montagem do SolidWorks e pressione " Ctrl + V " para colar as células copiadas . Agora, ou fechar ou excluir o arquivo Excel. A planilha é incorporado na montagem para que você não precisa do arquivo .
12

Clique duas vezes na planilha incorporada para ativar a planilha. Altere os valores das células e clique no botão de comando para atualizar a planilha de montagem. Clique fora da janela planilha incorporada para desativar e voltar para a montagem.