본문 바로가기
  • Welcome!

VBA, VB.NET For Creo315

Module VBA(Visual Basic for Applications)에서 모듈을 사용하는 이유는 코드의 구성과 재사용성을 향상시키기 위해서입니다. 모듈은 VBA 코드를 담는 컨테이너로서, 하나의 모듈에는 하나 이상의 프로시저 (서브루틴 또는 함수)가 포함될 수 있습니다. 1. 코드의 구성: 모듈을 사용하여 코드를 논리적으로 구성할 수 있습니다. 코드를 관련 기능에 따라 모듈로 분리하면 코드가 더 읽기 쉽고 유지 보수하기도 쉬워집니다. 각 모듈은 특정 작업 또는 특정 부분에 집중된 코드를 담게 됩니다. 2. 재사용성: 모듈을 사용하여 코드를 여러 프로시저에서 재사용할 수 있습니다. 일반적으로 사용되는 기능이나 서브루틴은 모듈에 작성하여 필요할 때마다 호출하고 재사용할 수 있습니다. 이렇게 함으로써 코드 중복을 피.. 2023. 8. 2.
유용한 사이트 http://creocustomization.com/category/vb-api/page/2/ VB API Archives - Creo Customization Creo VB API allows selecting objects from Creo Parametric interactively. The object may be a point, axis, datum, part, assembly, or any creo parametric objects. Here the procedure to call it in program Get a base session from the Async connection Create Se creocustomization.com 2023. 5. 21.
To : Jonny Stocco ■ Base code - Show Family Table Instance name only Option Explicit Sub FamilyInstanceName() Dim oCreoFileName As String, oFrontWord As String Dim oCreoFileLength As Integer oCreoFileName = Cells(1, "A") oCreoFileLength = InStr(oCreoFileName, " 2023. 3. 15.
ChatGPT - CREO UDF 파일 불러오기 CREO UDF(User Defined Feature) 파일을 VBA에서 불러오려면, Model 객체의 Features 컬렉션을 사용하여 CreoFeature 객체를 생성하고, LoadUDF 메서드를 사용하여 UDF 파일을 로드해야 합니다. 다음은 UDF 파일을 불러오는 예제 코드입니다. Sub LoadUDF() 'CREO Application 객체 생성 Dim app As Object Set app = CreateObject("pfcCreoApplication.CreoApplication") 'Model Descriptor 객체 생성 Dim modelDesc As Object Set modelDesc = app.ActiveModel 'Features 컬렉션 객체 생성 Dim features As Obj.. 2023. 2. 21.
Creo 라이브러리 관리 프로그램 라이브러리들을 편리하게 사용 할수 있는 프로그램 입니다. 어셈 블리 모드에서 엑셀 파일에 표시된 라이브러리 파일들을 쉽게 검색하여, 사용 가능 합니다. Windchill 프로그램이 없는 여러 사용자가 협업 하는 곳에 필수로 입니다. ■ 프로그램 파일 Download 라이브러리는 중앙에서 관리 합니다. 중복데이터를 생성 하면 안됩니다. 라이브러리를 구성 하기 위해서는 수동으로 작업을 해야 합니다. Window 공유 폴더를 사용 합니다. Nas 장비를 사용 하는곳은 FTP 서버를 설정 하여 사용 가능 합니다. 공유 PC가 준비되면 Window 공유 폴더를 설정 하고, config.pro > Search.pro 파일을 설정 합니다 1. Window 공유 폴더 사용 - 관리자가 공유 폴더를 설정 합니다. 관리자.. 2023. 2. 21.
부품 정보 리스트 프로그램 Creo 어셈블에 포한된 부품들의 정보를 표시합니다. 1. Model Name 2. Model Image 3. Model Type 4. Model 수량 5. Parameter Download *** Skeleton File is automatically removed [ . . . . . . .Test V_V . . . . . . ] Part List 프로그램 화면 입니다. 사용자 정의 구역은 모델에 저장하는 Parameter 입니다. 사용자 환경은 다릅니다. Parameter 이름 및 타입은 변경 가능 하고, 추가도 가능 합니다. 예시) "Part Number " 항목에 대한 예시 입니다. Part Number (표시항목 입니다, 한글 가능 합니다) / PART_NO (Creo Parameter Nam.. 2023. 2. 14.
도면이 가지고 있는 치수 값을 가지고 오기 #1 도면에 표시된 치수 값을 가져오는 코드 입니다. 아래 그림은 5개의 뷰를 가지고 있습니다. 전체 치수는 도면에서 생성한 치수 입니다. 5개의 치수를 가지고 있습니다. 도면은 3D를 뷰로 배치하고, Drawing Dimension을 추가 합니다. Excel VBA Download "Drawing Dimension" 버튼을 클릭하면 자동으로 도면이 가지고 있는 모든 치수를 표시합니다. Set IpfcModelItems = IpfcModelItemOwner.ListItems(EpfcModelItemType.EpfcITEM_DIMENSION) 코드로 드로잉 뷰(정면도, 측면도 ...)가 가지고 있는 치수(3D, 2D)를 모두 표시 합니다. "IpfcModelItemOwner"는 IpfcModel > IpfcDr.. 2023. 2. 14.
모델이 가지고 있는 치수 값을 가지고 오기 - 두번째 IpfcModelItemOwner.ListItems(EpfcModelItemType.EpfcITEM_DIMENSION) 코드로 Creo 모델이 가지고 있는 치수 값을 표시 합니다. IpfcBaseDimension.DimValue를 이용하여 값을 가져 올수 있습니다. Program Download IpfcBaseDimension.DimType 은 아래와 같이 "숫자"로 표시됩니다. DIM_LINEAR : "0" DIM_RADIAL : "1" DIM_DIAMETER : "2" DIM_ANGULAR : "3" IpfcBaseDimension. DimValue은 치수의 값을 가져옵니다. IpfcDimension. Tolerance, IpfcDimTolPlusMinus, IpfcDimTolSymmetric는 공차.. 2023. 2. 11.
Creo Feature Type 시각화 하기 Creo Part의 Feature 타입을 엑셀 차트 기능을 이용하여, 시각화 합니다. Creo Part 모델에서 Parameter 값을 이용 하여 시각화 할 수 있습니다. Creo Model Excel Program Download 여러개의 sub (코드)를 이용합니다. 사용자 화면은 아래와 같습니다 1. Creo Session 연결 Code 입니다. 전역 변수를 정의 합니다 Option Explicit Public asynconn As New pfcls.CCpfcAsyncConnection Public conn As pfcls.IpfcAsyncConnection Public oSession As pfcls.IpfcBaseSession Public oModel As IpfcModel Public oSol.. 2023. 2. 10.
Get the parameter value in the feature ■ "IpfcModelItem"를 이용 하여, 모델이 가지고 있는 요소들을 가져 올수 있습니다. The possible types of model item are as follows: ITEM_FEATURE ITEM_SURFACE ITEM_EDGE ITEM_COORD_SYS ITEM_AXIS ITEM_POINT ITEM_QUILT ITEM_CURVE ITEM_LAYER ITEM_NOTE ITEM_DIMENSION ITEM_REF_DIMENSION 아래 코드는 모델이 가지고 있는 Featrue의 총 수량은 몇개인가 알아보는 것 입니다 Dim oModelowner As IpfcModelItemOwner Set oModelowner = oModel Dim oModelitems As IpfcModelItems .. 2023. 2. 8.
함께 VBA 만들기 #7 - Creo 3D 모델 정보 보기 프로그램 사용 방법 > ToolBOX VBA 프로그램 설치 및 설정 프로그램 실행 순서 2023. 2. 8.
함께 VBA 만들기 #6 - Parameter 값 모델에 저장하기 엑셀 파일에 입력한 값을 모델에 저장 하는 기능 입니다 엑셀에서 파라메터 이름을 가져오고, 모델의 동일한 파라메터에 값을 저장 합니다. - 파라메터 타입에 주의 합니다. ■ 사용자 화면 ■ 코드 1. 설계자, 검도자, 승인자 (Designer, Checker, Approver) 값, part 파일에 입력 하기 for 문을 사용 하여 반복하여 Parameter 이름과 값을 엑셀에서 가져와 모델에 저장 합니다. String 타입이므로 "CreateStringParamValue"을 사용 합니다. '// DESIGNER,CHECKER,APPROVER /////////////////////////////////////////////////////////////////////// For i = 0 To 2 oCel.. 2023. 2. 8.
반응형

티스토리툴바