Sub importBlock()
Dim importFile As String
Dim InsertPoint(0 To 2) As Double
importFile = “C:rosensor.dxf”
InsertPoint(0) = 100
InsertPoint(1) = 100
InsertPoint(2) = 0
scalefactor = 1
ThisDrawing.Import importFile, InsertPoint, scalefactor
Update
End Sub
여기서, 100,100 에 파일이 삽입이 되어야 하는데, 0,0 에 계속 삽입이 됩니다.
뭐가 문제인지 모르겠습니다. ㅠ