반응형
▶ 속성(Property)과 Function에 대해 알아보기
현재 설정된 작업 디렉토리의 Path와 폴더 이름을 표시합니다.변수 "workpath"에 Path와 폴더 이름을 넣습니다. 엑셀 Cel "C2"에 표시 됩니다.
Function GetCurrentDirectory () as String
▶ Creo Parametric에 대한 현재 작업 디렉토리의 절대 경로 이름을 가져옵니다.
▶ 소스코드
Sub Model_Nanme()
On Error GoTo RunError
Dim asynconn As New pfcls.CCpfcAsyncConnection
Dim conn As pfcls.IpfcAsyncConnection
Dim session As pfcls.IpfcBaseSession
Dim workpath As String
Set conn = asynconn.Connect("", "", ".", 5)
Set session = conn.session
workpath = session.GetCurrentDirectory
Range("C2").Value = workpath
'Disconnect with Creo
conn.Disconnect (2)
Exit Sub
RunError:
If Err.Number <> 0 Then
MsgBox "Process Failed : Unknown error occurred." + Chr(13) + _
"Error No: " + CStr(Err.Number) + Chr(13) + _
"Error: " + Err.Description, vbCritical, "Error"
If Not conn Is Nothing Then
If conn.IsRunning Then
conn.Disconnect (2)
End If
End If
End If
End Sub
▶ 프로그램 실행 화면
VBA에서 속성이란 ?
엑셀 VBA 속성(Property) 총정리 강의 :: VBA 기초 - 오빠두엑셀
엑셀 VBA Property 속성이란 무엇인가요? | 엑셀 VBA 강의 1-6 첨부파일에 이상이 생겼을 경우, 1:1 문의하기로 연락주시면 신속히 해결해드리겠습니다. 1. VBA에서 Property(속성) 이란 무엇인가? 이전강
www.oppadu.com
sub & Function
03.프로시저의 호출
하나의 프로그램은 보통 여러 개의 프로시저로 구성되어 있고 그중 메인프로시저는 작업별로 작성한 여러 개의 프로시저를 불러와 기능을 수행한다. 하나로 작성하지 않고 왜 여러 ...
wikidocs.net
'VBA, VB.NET For Creo' 카테고리의 다른 글
Part 파일을 jpg 이미지로 저장 하기 (0) | 2022.09.02 |
---|---|
현재 활성화된 폴더의 하위폴더 알아보기 (0) | 2022.08.30 |
Creo VBA 실행 에러 메세지 처리 (0) | 2022.08.26 |
VBA 기초 - Hello World (0) | 2022.08.22 |
Excel VBA development environment (0) | 2022.08.20 |