CAD设计论坛

 找回密码
 立即注册
论坛新手常用操作帮助系统等待验证的用户请看获取社区币方法的说明新注册会员必读(必修)
查看: 1390|回复: 0

[闲聊] VBA计算出图比例

[复制链接]
发表于 2008-3-7 09:09 | 显示全部楼层 |阅读模式
Sub 计算出图比例()
  B0 N0 h9 W  a$ Y'以米为单位绘制图纸时,以毫米绘图时将下面1000/删掉+ y1 S6 O  c' O, u0 E
ThisDrawing.ActiveSpace = acPaperSpace
" V* l, D9 Y7 e, nDebug.Print "出图比例是: " & 1000 / ThisDrawing.PaperSpace.item(1).CustomScale
9 g! L. N) w$ ]& z& n3 K+ yEnd Sub
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关于|免责|隐私|版权|广告|联系|手机版|CAD设计论坛

GMT+8, 2026-6-26 05:36

CAD设计论坛,为工程师增加动力。

© 2005-2026 askcad.com. All rights reserved.

快速回复 返回顶部 返回列表