solidworks的宏程序怎么定义单位?

wanghong26

今天用solidworks的宏程序在3D草图里面输入了一组坐标点的数据，运行宏后发现其数值放大了1000倍，后来从新操作录制了一条新的测试的宏，发现数值也是1000倍的差距，是不是宏程序里面的数值默认是米为单位？
那么问题来了？怎么在宏程序里面把单位设置为毫米啊？

敏慧7667

你不如上传宏程序，来证明你的所言非虚

8le8

' ******************************************************************************
' C:\Users\Administrator\AppData\Local\Temp\swx8008\Macro1.swb - macro recorded on 05/22/15 by Administrator, w6 q+ a* [  w
' ******************************************************************************" J8 t4 p8 g: N# ]) `9 @. s
Dim swApp As Object- z: m% [6 t7 ^+ g4 f
% O( Q. x$ U3 b2 }+ z
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Sub main()
Set swApp = _. L* r( @4 o6 T7 p, D- w
Application.SldWorks
% M6 D6 G3 H7 v
Set Part = swApp.ActiveDoc8 z9 m( Q2 Y! X! q0 [5 _
Dim skPoint As Object8 c# f9 Y% Z2 R2 X
Set skPoint = Part.SketchManager.CreatePoint(11111.11111, 11111.11111, 11111.11111)" P8 o- _) [- x, H8 h0 l! W
Set skPoint = Part.SketchManager.CreatePoint(22222.22222, 22222.22222, 22222.22222)
Set skPoint = Part.SketchManager.CreatePoint(33333.33333, 33333.33333, 33333.33333)
Set skPoint = Part.SketchManager.CreatePoint(44444.44444, 44444.44444, 44444.44444)
End Sub


以上，进入3D草图后执行这个宏程序，结合EXCEL就能批量描点了，只是发现单位有问题，1000倍差距，不知道是哪里出了问题

伯4368

宏里所執行的尺寸值之單位皆內定為 " 米",
所以尺寸值原為 "mm" 者,在宏里皆要 除以 1000

zhuyuncheng

   经典案例图书

所以说宏程序里面是没办法设定单位的了？

hahap

是的,內定死的,改不了!(對一般使用者來說,若碰到大神動用.DLL,就不知道能改否

25dwt9mwce

   经典案例图书

多谢了

姝惠2768

学习了