반응형 drawing view1 Drawing View List Drawing View List 표시 Source Code Sub view_name_list() Dim asynconn As New pfcls.CCpfcAsyncConnection Dim conn As pfcls.IpfcAsyncConnection Dim session As pfcls.IpfcBaseSession On Error GoTo RunError Set conn = asynconn.Connect("", "", ".", 5) Set session = conn.session Dim drawingFilename As IpfcModel Set drawingFilename = session.CurrentModel Cells(3, "C") = drawingFilename.Filename Dim Model2D.. 2021. 3. 8. 이전 1 다음 반응형
