![]() |
|
||||
![]() Diga adeus às planilhas do Excel e tenha 100% de controle sobre suas contas a pagar e a receber, gestão de receitas e despesas, cadastro de clientes e fornecedores com fotos e histórico de atendimentos. Código fonte completo e funcional, com instruções para instalação e configuração do banco de dados MySQL. Fácil de modificar e adicionar novas funcionalidades. Clique aqui e saiba mais |
Você está aqui: AutoCAD VBA ::: AutoCAD + Excel ::: Controlar o AutoCAD a partir do Excel |
||||
Como acessar o AutoCAD a partir do Excel e retornar sua versãoQuantidade de visualizações: 280 vezes |
||||
Nesta dica eu mostro os passos iniciais para iniciar uma interação com o AutoCAD a partir do Excel. O único conhecimento necessário é a habilidade básico de criação de macros simples no Excel usando o Editor Visual Basic (visível na aba Desenvolvedor). Antes de executar o código abaixo, adicione uma referência ao AutoCAD 2021 Type Library (o seu deve ser bem parecido, dependendo da sua versão do AutoCAD). Para isso vá em Ferramentas -> Referências. Localize a biblioteca AutoCAD 2021 Type Library, use os botões de prioridade para jogá-lo o mais alto que puder e clique o botão OK. Depois de adicionada a referência, nós definimos duas variáveis públicas, uma do tipo AcadApplication e outra do tipo AcadDocument. A variável AcadApplication representará o objeto AutoCAD, enquanto AcadDocument representará o documento ativo no AutoCAD. Para acessar o AutoCAD a partir do Excel nós usamos uma chamada à função Interaction.GetObjec(, "AutoCAD.Application"), que pode também ser Interaction.GetObject(, "AutoCAD.Application.22"). O restante do código está bem comentado e fácil de entender. Veja o código Excel VBA completo para o exemplo:
Ao executar esta macro no Excel nós teremos o seguinte resultado: Executando AutoCAD versão 24.2s (LMS Tech) Note que a mensagem Debug.Print será exibida na Janela de Verificação do Microsoft Visual Basic for Application. Se essa janela não estiver visível, vá em Exibir -> Janela "Verificação Imediata". |
||||
![]() |
||||
AutoCAD VBA ::: Dicas & Truques ::: Linha, Linhas, Comando LINE |
||||
Como retornar as coordenadas iniciais e finais de uma linha no AutoCAD usando AutoCAD VBA e as propriedades StartPoint e EndPointQuantidade de visualizações: 237 vezes |
||||
Nesta dica mostrarei como podemos usar as propriedades StartPoint e EndPoint do objeto AcadLine do AutoCAD VBA para obter e retornar as coordenadas iniciais e finais de uma linha do AutoCAD. Veja que usamos a função ThisDrawing.Utility.GetEntity para pedir para o usuário selecionar uma linha na área de desenho. Uma vez selecionada a linha nós obtemos suas coordenadas iniciais e finais usando StartPoint e EndPoint. Para finalizar nós usamos a função ThisDrawing.Utility.Prompt para exibir as coordenadas x, y e z iniciais e finais da linha na janela de comando do AutoCAD. Veja o código AutoCAD VBA completo para o exemplo:
Ao executar este código AutoCAD VBA nós teremos o seguinte resultado: As coordenadas iniciais são: X = 55,9523227122882; Y = 42,9870898477564; Z = 0 As coordenadas finais são: X = 116,586068002574; Y = 20,6918609035664; Z = 0 | ||||
AutoCAD VBA ::: Dicas & Truques ::: Linha, Linhas, Comando LINE |
||||
Como criar uma linha no AutoCAD usando Autocad VBA e a função AddLine() do objeto ModelSpaceQuantidade de visualizações: 586 vezes |
||||
A função AddLine() do AutoCAD VBA nos permite desenhar uma linha mediante o fornecimento de um ponto inicial e um ponto final. Esta função é chamada a partir do objeto ModelSpace, que, por sua vez, está contido no objeto ThisDrawing. A função AddLine() recebe dois valores do tipo Variant, ou seja, um vetor de três elementos do tipo double, e retorna um objeto Line. Veja um código AutoCAD VBA completo no qual informamos as coordenadas x, y e z dos pontos inicial e final e desenhamos uma linha entre eles:
Ao executar este código AutoCAD VBA nós teremos uma linha saindo do ponto x=0,y=0,z=0 e indo até o ponto x=350,y=500,z=0. | ||||
AutoCAD VBA ::: Dicas & Truques ::: Comprimentos, distâncias e ângulos |
||||
Como calcular a distância entre dois pontos no AutoCAD usando AutoCAD VBAQuantidade de visualizações: 266 vezes |
||||
Em várias situações nós precisamos calcular e retornar a distância entre dois pontos na área de desenho do AutoCAD. Esta tarefa pode ser facilmente realizada com o uso da linguagem AutoCAD VBA. Neste exemplo nós usaremos a função ThisDrawing.Utility.GetPoint() para pedir para o usuário selecionar dois pontos na área de desenho e em seguida vamos mostrar a distância entre eles. Veja o código AutoCAD VBA completo para o exemplo:
Ao executar este código AutoCAD VBA nós teremos o seguinte resultado: A distância entre os dois pontos é: 64.6029 | ||||
Veja mais Dicas e truques de AutoCAD VBA |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
1º lugar: Java |