□ Excel의 Cell과 Creo Dimension 이름 연계
Creo에서 치수를 선택하면. "sheet 2"의 Dimension Name, Value 값이 순차적으로 표시 됩니다. 적용 버튼을 클릭하면 "sheet 1"에 값이 표시됩니다. "sheet 1"의 값을 변경 하면, 모델이 자동으로 변경 됩니다.
Sheet 1 | Sheet 2 |
Cell의 값은 추가 또는 변경 가능 합니다. Sheet 2의 C4, C7, C10의 개수를 카운트하고, FOR 문을 이용하여 Dimension Value를 Sheet 1의 Cell 주소로 보내는 프로그램 입니다.
▷ 프로그램 실행 결과
▷ VBA 코드
Sub CopyCellValue()
Dim cellname As String
Dim rng As Range
Dim rn As Long
'// 사용자 정의 Cell의 주소 개수를 카운트 합니다
Set rng = Worksheets("Sheet1").Range("G5", Worksheets("Sheet1").Cells(Worksheets("Sheet1").Rows.Count, "G").End(xlUp))
rn = rng.Rows.Count
For rn = 0 To rn - 1
cellname = Sheets("Sheet1").Cells(rn + 5, "G").Value
Sheets("Sheet1").Range(cellname).Value = Sheets("Sheet1").Cells(rn + 5, "I").Value
Next rn
End Sub
도면에서 치수 값을 가져오는 코드와 결합한다면, 설계 검증 프로그램을 사용 할수 있습니다.
sheet 1에는 설계 검증 프로그램 양식을 정의 하고, Sheet 2에는 설계 검증에 사용하는 도면의 치수를 선택해서 가져옵니다. Sheet 2는 데이터베이스 입니다.
Creo 모델을 Template으로 만들면, 자동으로 엑셀의 Sheet 2에 해당하는 치수 값이 저장되고, 설계 검증 양식이 있는 Sheet 1에도 저장 됩니다. 더 발전 한다면 AI가 자동으로 설계를 할수 있을것 입니다. Creo 및 모든 3D CAD는 Feature 기반의 프로그램 입니다. 히스토리가 남아 있고, 어떻게 모델이 만들어 졌는지 분석이 가능 합니다.
아래 그림은 Creo 모델입니다
▷ Creo 모델
아래 코드는 위 그림의 creo 모델을 이해하는 코드 입니다 맨아래 치수 값을 변경하면, 이동 및 사이즈를 변경 합니다.
▷ Creo 코드
VERSION 9.0
REVNUM 20194
LISTING FOR PART PRT0010
INPUT
END INPUT
RELATIONS
END RELATIONS
ADD FEATURE (initial number 1)
INTERNAL FEATURE ID 1
DATUM PLANE
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Constraints Defined
2.1 Constraint #1 Defined
2.1.1 Constr Type X Axis
3 Flip Datum Dir Defined
4 Fit Defined
4.1 Fit Type Default
NAME = RIGHT
FEATURE IS IN LAYER(S) :
00___PRT_ALL_DTM_PLN - OPERATION = SHOWN
01___PRT_DEF_DTM_PLN - OPERATION = SHOWN
END ADD
ADD FEATURE (initial number 2)
INTERNAL FEATURE ID 3
DATUM PLANE
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Constraints Defined
2.1 Constraint #1 Defined
2.1.1 Constr Type Y Axis
3 Flip Datum Dir Defined
4 Fit Defined
4.1 Fit Type Default
NAME = TOP
FEATURE IS IN LAYER(S) :
00___PRT_ALL_DTM_PLN - OPERATION = SHOWN
01___PRT_DEF_DTM_PLN - OPERATION = SHOWN
END ADD
ADD FEATURE (initial number 3)
INTERNAL FEATURE ID 5
DATUM PLANE
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Constraints Defined
2.1 Constraint #1 Defined
2.1.1 Constr Type Z Axis
3 Flip Datum Dir Defined
4 Fit Defined
4.1 Fit Type Default
NAME = FRONT
FEATURE IS IN LAYER(S) :
00___PRT_ALL_DTM_PLN - OPERATION = SHOWN
01___PRT_DEF_DTM_PLN - OPERATION = SHOWN
END ADD
ADD FEATURE (initial number 4)
INTERNAL FEATURE ID 19185
GROUP HEAD
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Name Defined
2 Features Defined
3 Construction Defined
NAME = 축
MEMBER OF A GROUP, NAME = 축
LEADING FEATURE OF THE GROUP: ID = 19185
LAST FEATURE OF THE GROUP: ID = 50
END ADD
ADD FEATURE (initial number 5)
INTERNAL FEATURE ID 46
PARENTS = 3(#2) 5(#3)
DATUM AXIS
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Constraints Defined
2.1 Constraint #1 Defined
2.1.1 Type Through
2.1.2 Reference TOP:F2(DATUM PLANE)
2.2 Constraint #2 Defined
2.2.1 Type Through
2.2.2 Reference FRONT:F3(DATUM PLANE)
3 Fit Defined
3.1 Fit Type Default
NAME = X
FEATURE BELONGS TO LOCAL GROUP 축
FEATURE IS IN LAYER(S) :
02___PRT_ALL_AXES - OPERATION = SHOWN
MEMBER OF A GROUP, NAME = 축
LEADING FEATURE OF THE GROUP: ID = 19185
LAST FEATURE OF THE GROUP: ID = 50
END ADD
ADD FEATURE (initial number 6)
INTERNAL FEATURE ID 39
PARENTS = 1(#1) 5(#3)
DATUM AXIS
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Constraints Defined
2.1 Constraint #1 Defined
2.1.1 Type Through
2.1.2 Reference FRONT:F3(DATUM PLANE)
2.2 Constraint #2 Defined
2.2.1 Type Through
2.2.2 Reference RIGHT:F1(DATUM PLANE)
3 Fit Defined
3.1 Fit Type Default
NAME = Y
FEATURE BELONGS TO LOCAL GROUP 축
FEATURE IS IN LAYER(S) :
02___PRT_ALL_AXES - OPERATION = SHOWN
MEMBER OF A GROUP, NAME = 축
LEADING FEATURE OF THE GROUP: ID = 19185
LAST FEATURE OF THE GROUP: ID = 50
END ADD
ADD FEATURE (initial number 7)
INTERNAL FEATURE ID 50
PARENTS = 1(#1) 3(#2)
DATUM AXIS
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Constraints Defined
2.1 Constraint #1 Defined
2.1.1 Type Through
2.1.2 Reference RIGHT:F1(DATUM PLANE)
2.2 Constraint #2 Defined
2.2.1 Type Through
2.2.2 Reference TOP:F2(DATUM PLANE)
3 Fit Defined
3.1 Fit Type Default
NAME = Z
FEATURE BELONGS TO LOCAL GROUP 축
FEATURE IS IN LAYER(S) :
02___PRT_ALL_AXES - OPERATION = SHOWN
MEMBER OF A GROUP, NAME = 축
LEADING FEATURE OF THE GROUP: ID = 19185
LAST FEATURE OF THE GROUP: ID = 50
END ADD
ADD FEATURE (initial number 8)
INTERNAL FEATURE ID 7
COORDINATE SYSTEM
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Name Display Option YES
3 Display Zoom Dependent Option NO
NAME = ORG
FEATURE IS IN LAYER(S) :
05___PRT_ALL_DTM_CSYS - OPERATION = SHOWN
END ADD
ADD FEATURE (initial number 9)
INTERNAL FEATURE ID 19192
PARENTS = 1(#1) 3(#2) 5(#3)
PROTRUSION: Extrude
NO. ELEMENT NAME INFO
--- ------------- -------------
1 Feature Name Defined
2 Extrude Feat type Solid
3 Material Add
4 Body Defined
4.1 Use body Selected
4.2 Selected bodies Body 1
5 Section Defined
5.1 Setup Plane Defined
5.1.1 Sketching Plane FRONT:F3(DATUM PLANE)
5.1.2 View Direction Side 1
5.1.3 Orientation Right
5.1.4 Reference RIGHT:F1(DATUM PLANE)
5.2 Sketch Defined
6 Feature Form Solid
7 Direction Side 2
8 Depth Defined
8.1 Side One Defined
8.1.1 Side One Depth None
8.2 Side Two Defined
8.2.1 Side Two Depth Variable
8.2.2 Value 333.74
SECTION NAME = Section 1
FEATURE'S DIMENSIONS:
d377 = (Displayed:) 333.74 General_Dims
( Stored:) 333.74 ( 0.01, -0.01 )
d378 = (Displayed:) 135.99 General_Dims (weak)
( Stored:) 135.9934935848 ( 0.2, -0.2 )
d379 = (Displayed:) 531.49 General_Dims (weak)
( Stored:) 531.4893257478 ( 0.3, -0.3 )
d380 = (Displayed:) 263.52 General_Dims (weak)
( Stored:) 263.5152613397 ( 0.2, -0.2 )
END ADD
MASSPROP
END MASSPROP
AI는 학습을 할것 입니다. 마우스를 설계 하기 위해 어떤 어셈블 구조를 만들어야 하는지, 부품의 크기는 어떻게 만들어야 하는지 등을 학습 할것 입니다. 조립 공차도 학습 할것이고, 가공까지 바로 갈수 있는 방법을 학습 할것 입니다.
누군가는 이것이 가능한 프로그램을 만들것 입니다. 기계가 스스로 기계를 만들수 있는 날이올것 입니다.
그러면 인간이 존재 할수 있을까요? . . . . .
'VBA For Creo' 카테고리의 다른 글
선택된 Feature에 Dimension이 있는 경우 가져오기 (0) | 2023.12.31 |
---|---|
선택한 Feature 이름 가져오기 (0) | 2023.12.29 |
#5 설계 공차 분석 - 도면의 치수 및 공차 값 가져오기 (0) | 2023.12.25 |
#3 MBD : 모델 치수 및 공차 가져오기-3 (0) | 2023.12.24 |
#3 MBD : 모델 치수 가져오기-2 (0) | 2023.12.24 |