如何用vba写带有公差的文字

yuangw1234 · 发表于 2006-10-18 21:18:00

如10后跟下公差+0.03,上公差+0.06,请问用addtext方法如何写程式

流星蔡园 · 发表于 2006-10-19 08:47:00

        DimObj.ToleranceDisplay = acTolDeviation
        DimObj.ToleranceUpperLimit = 0.06
        DimObj.ToleranceLowerLimit = -0.03
        DimObj.ToleranceSuppressTrailingZeros = True

夜孤城 · 发表于 2006-10-23 20:11:00

这样只能改公差，不能改尺寸。

用：

DimObj.TextOverride = DimObj.TextOverride & "\H0.5x;\S" & 上公差 & "^" & 下公差

这样就可以改尺寸和公差了。

yuangw1234 · 发表于 2006-10-23 22:45:00

你们都是在讲标注了,我只是说写带有公差的单行文字而已,如直径可以写为%%c,度可以写为%%d,还有正负2可以写为%%p2,当插入文字时它们自动会变为正负2,但如可写正0.03,负0.06,有没有那位大师写过

mccad · 发表于 2006-10-24 06:57:00

单行文字不行，请使用多行文字MTEXT格式。

yuangw1234 · 发表于 2006-10-25 07:19:00

多行文字是不是要分三行写,写出来的效果太差了

账号		自动登录	找回密码
密码			注册