[솔리드웍스 VBA] 1. 솔리드웍스 VBA 간단히 살펴보기

솔리드웍스 VBA란? 

솔리드웍스에서는 Visual Basic Application을 이용하여 우리가 버튼을 클릭하며 진행했던 설계 과정을 코딩으로 대신할 수 있습니다. 이때 Visual Basic 이라는 언어를 사용합니다. 설계 과정을 코딩으로 대신하면 설계 자동화가 가능하겠죠? 

 

매크로 만들고 실행해보기

먼저 매크로가 어떻게 작동하는지 간단히 살펴봅시다. 아래 과정을 따라해봅시다. 

 

1. 솔리드웍스를 켭니다. 

2. [도구]-[매크로]-[새 매크로]를 클릭합니다. 

3. 파일 이름을 설정합니다. 

4. 저장을 클릭합니다. 아래와 같이 편집기가 열립니다. 

 

 

 

편집기에 아래 코드를 입력합시다. 

 

Dim swApp As SldWorks.SldWorks
Dim swModel As ModelDoc2
Dim swSketchMgr As SketchManager

Sub main()
    ' 솔리드웍스 연결
    Set swApp = Application.SldWorks
    
    ' 새 파트 파일 생성
    Set swModel = swApp.NewPart
    
    ' 앞면 선택
    swModel.Extension.SelectByID2 "Front Plane", "PLANE", 0, 0, 0, False, 0, Nothing, 0
    
    ' 스케치 시작
    Set swSketchMgr = swModel.SketchManager
    swSketchMgr.InsertSketch True
    
    ' 원 그리기 (중심: 0,0 / 반지름: 0.05미터)
    swSketchMgr.CreateCircle 0, 0, 0, 0.05, 0, 0
    
    ' 스케치 종료
    swSketchMgr.InsertSketch True
    
    ' 화면 줌 맞춤
    swModel.ViewZoomtofit2
End Sub

 

재생 버튼을 누르면 원이 그려지는 것을 확인할 수 있습니다. 

 

매크로 파일 바로 실행하기

편집기를 거치치 않고 매크로 파일을 바로 실행할 수도 있습니다. 열려 있는 편집기를 종료합니다. 이제 솔리드웍스 기본 화면으로 돌아옵니다. 

 

위에서 만든 매크로를 실행해보겠습니다. 아래 과정을 따라하세요. 

 

1. [도구]-[매크로]-[실행]을 클릭합니다. 

2. 위에서 저장한 파일을 선택합니다. 

 

매크로가 실행되며 원이 그려집니다.