본문 바로가기
  • Welcome!
VBA, VB.NET For Creo

Spur 기어 #3 Spur Gear 사용 방법

by ToolBOX01 2023. 1. 31.
반응형

Spur Gear Template vba는 설계자가 미리 모델을 만들어 놓을 3D 형상을  새로운 파일 이름으로 저장 하고,
Paramter 및 Dimenesion을 변경 하여 새로운 Spur Gear를 만듭니다.

[ 다양한 Spur Gear ]

첨부된 "Spur Gear Template" 모델을 편집하여, "보스". "리브", "구멍"을 추가하여 자신에게 맞는 3D Template 모델을 만들어 사용 하십시요.

첨부된 엑셀 VBA는 사용자 사용 오류를 100% 담지 못했습니다. 동일한 파일 이름이 Session에 있으면 안됩니다. 첨부된 엑셀 VBA를 참고하여 더블 기어를 만들어 보세요. 헬리컬 기어를  첨부된 모델 과 엑셀 VBA를 변형 하여 새로운 프로그램을 만들어 보십시요 

사용중 문의 사항 있으면 메일 주십시요 lionkk@idt21c.com
행운을 빕니다 ^_^

■ Template Model Download

idt_template_spur_gear.prt.5
0.65MB

 

■ Template 구성 Sheet

 - Template 파일이 저장된 폴더를 정의 합니다
 -  Template 파일 이름을 정의 합니다.
 - Gear의 모듈 값을 정의 합니다
 - Gear 압력 각도 값에 따라 잇수를 정의 합니다

■ Template 프로그램 화면

- 회색 바탕의 Cell은 입력이 불가능 합니다. 프로그램에서 자동으로 표시 합니다

1 단계] 작업 폴더를 선택
 - Creo에서 작업 폴더를 선택 합니다.
 - Spur Gear 파일이 저장 되는 위치 입니다 

2 단계]  입력 하기
 - 압력 각도를 선택 합니다
 - 모듈을 선택 합니다
 - Gear 잇수를 선택 합니다
 - 이빨 두게를 입력 합니다

3 단계 ] "File Name" 버튼 을 클릭 합니다
 - New Model Name이 자동으로 생성 됩니다

 

4 단계] Gear Making을 선택 합니다
 - 새로운 모델을 만들수 있습니다.

 

■ Template 프로그램 사용 동영상

 

주의] 동일한 파일 이름이 작업 공간 또는 Session에 있으면 스크립트 오류가 발생 합니다.

■ VBA Download

Gear Tempate.xlsm
0.24MB

 

 

■ 참고 자료

 

Spur 기어 #1

Spur Gear는 Involute curve를 이용하여 모델링(설계)을 합니다. 변수로는 아래와 같습니다 1) M (모듈) 이끝 높이 : 이끝원에서 피치원 사이 거리 2) Z (잇수) 3) PA (압력 각도) 4) GW(기어 폭) ■ Spur Gear 용어

tool-2020.tistory.com

 

 

 

Spur 기어 #2

Template 모델이 완성되면 사용자 화면을 디자인 해야 합니다. 모듈 값 및 잇수는 범위 설정을 해야 합니다. 또한 압력 값도 범위를 설정 해야 합니다. 범위 설정은 엑셀의 유효성 검사 기능을 이용

tool-2020.tistory.com

 

by lionkk@idt21c.com