Software  
 
Conhecimento computador >> Software >> Microsoft Access >> 
Como Ler Excel em uma macro SolidWorks
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 @ [email protected] " ) . 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 @ [email protected] " ) . SystemValue = 0.0254Part.Parameter ( " Shaft2 @ [email protected] " ) . SystemValue = 0.0254Part.Parameter ( " MyDia1 @ [email protected] " ) . SystemValue = 0,1016 Part.Parameter ( " MyDia2 @ [email protected] " ) . 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 @ [email protected] " ) . SystemValue = Excel.Range ( "B1" ) * 0.0254Part.Parameter ( " MyDia1 @ [email protected] " ) . SystemValue = Excel.Range ( "B2" ) * 0.0254Part.Parameter ( " Shaft2 @ @ Sketch1 mygear2.Part " ) . SystemValue = Excel.Range ( " B3 " ) * 0.0254Part.Parameter ( " MyDia2 @ [email protected] " ) 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.

Anterior :

Próximo : No
  Os artigos relacionados
·Como estabelecer nível de usuário de segurança no Mi…
·Como configurar Campos obrigatórios no Microsoft Acces…
·Como se livrar de Lacunas no Excel Gráficos 
·Como determinar a fundamental Tipo de chave para o uso …
·O que causa um triângulo verde no Excel 
·Como fazer um título do eixo vertical em Excel 
·Como solucionar problemas de Microsoft Access 97 Erro d…
·Como alterar um calendário no Excel para Mac 
·Como Aplicar Fórmula para uma tabela inteira no Excel 
·Importância do Microsoft Access 2007 para empresas 
  Artigos em destaque
·Como verificar um PC para Trojans 
·Como alterar uma paleta de cores Sprite 
·Como usar o Gimp para fazer um cabeçalho CP 
·Vinil para Software de conversão de CD 
·Como Jogar um MPEG com áudio AC3 
·Como excluir um backup Ícone Norton 
·Como fazer um gráfico Gráfico de Barras 
·Qual é a diferença entre o Windows Media Player e Rea…
·Como criar um calendário do dia 
·Uso de redes sociais com Drupal 
Cop e direita © Conhecimento computador https://ptcomputador.com Todos os Direitos Reservados