设为首页收藏本站
开启辅助访问 切换到宽版

SolidWorks机械工程师网——最大的SolidWorks学习平台

 找回密码
 立即注册

QQ登录

只需一步，快速开始

SolidWorks机械工程师网——最大的SolidWorks学习平台»学习社区 › SolidWorks开发与拓展应用 › SolidWorks二次开发（宏，VBA） › 请大佬，高手们 修改下这个快速公差宏
123下一页
返回列表 发新帖
楼主: sunsu168
打印 上一主题 下一主题

请大佬，高手们 修改下这个快速公差宏

  [复制链接]
sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
21#
 楼主| 发表于 2023-6-26 07:56:32 | 只看该作者

   经典图书
每日一顶.... 大伙顶上去，让高手过目下
SolidWorks机械工程师网
提示：建议使用谷歌浏览器浏览本网站！如单击这里下载！否则，可能无法下载附件文件！（支持大多数版本的谷歌浏览器，支持360和QQ浏览器的极速模式，即谷歌内核模式，使用IE和Edge浏览器，浏览个别网页以及下载文件时，会误报“***不安全”，此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载，另外，本网站不含任何不安全的文件，已联系微软公司解决，纯属IE和Edge浏览器误报）
回复 支持 反对

使用道具 举报

jyzas001

3

主题

677

帖子

994

金币

传奇

Rank: 8Rank: 8

积分
6190

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
22#
发表于 2023-6-26 08:32:18 | 只看该作者
来学习下
SolidWorks机械工程师网
提示：建议使用谷歌浏览器浏览本网站！如单击这里下载！否则，可能无法下载附件文件！（支持大多数版本的谷歌浏览器，支持360和QQ浏览器的极速模式，即谷歌内核模式，使用IE和Edge浏览器，浏览个别网页以及下载文件时，会误报“***不安全”，此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载，另外，本网站不含任何不安全的文件，已联系微软公司解决，纯属IE和Edge浏览器误报）
回复 支持 反对

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
23#
 楼主| 发表于 2023-6-26 09:09:40 | 只看该作者

   经典图书
zhenyx1012 发表于 2023-6-25 20:03
H8的代码，其他的孔公差将H8改一下就可以了。轴公差将H8删除改为空参数，后面的一个空参数改一下，如f7



我复制了代码， 点新建宏 命令，粘贴后，  运行显示如下   上下偏差都是0    。  请问是怎么回事。如图

大神，能否更改下代码显示模式改为 套合（仅对公差），  增加常驻 按钮


SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3869

0

主题

626

帖子

458

金币

传奇

Rank: 8Rank: 8

积分
3771

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
24#
发表于 2023-6-26 13:11:57 | 只看该作者
好好学习，天天向上！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

zhenyx1012

1

主题

33

帖子

359

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1218

最佳新人活跃会员宣传达人
25#
发表于 2023-6-26 19:40:46 | 只看该作者

   经典案例图书
sunsu168 发表于 2023-6-26 09:09
我复制了代码， 点新建宏 命令，粘贴后，  运行显示如下   上下偏差都是0    。  请问是怎么回事。如 ...

试试这样改：boolstatus = Part.EditDimensionProperties2(8, 0, 0, "H8", "", False, 3, 2, True, 12, 12, "", "", True, "", "", True)
仅对公差的话试试这样：boolstatus = Part.EditDimensionProperties2(9, 0, 0, "H8", "", False, 3, 2, True, 12, 12, "", "", True, "", "", True)
SolidWorks机械工程师网
回复 支持 1 反对 0

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
26#
 楼主| 发表于 2023-6-27 08:05:33 | 只看该作者
zhenyx1012 发表于 2023-6-26 19:40
试试这样改：boolstatus = Part.EditDimensionProperties2(8, 0, 0, "H8", "", False, 3, 2, True, 12, 1 ...

请问为什么 运行宏后 上下标 ，还是零....
再问可否弄成有按钮 的窗体
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

Allate

38

主题

1002

帖子

1万

金币

版主

Rank: 7Rank: 7Rank: 7Rank: 7

积分
24790

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
27#
发表于 2023-6-27 08:12:52 | 只看该作者

   经典案例图书
你自己更改吧，难度也不大。
另外，对于这种明显使用我的宏，却改成自己的名字的人，表示鄙视。
SolidWorks机械工程师网
回复 支持 3 反对 0

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
28#
 楼主| 发表于 2023-6-27 08:58:31 | 只看该作者
Allate 发表于 2023-6-27 08:12
你自己更改吧，难度也不大。
另外，对于这种明显使用我的宏，却改成自己的名字的人，表示鄙视。

A神，我不会宏，       
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
29#
 楼主| 发表于 2023-6-27 15:25:52 | 只看该作者
             每日一顶
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
30#
 楼主| 发表于 2023-6-28 08:49:39 | 只看该作者

   经典图书
            每日一顶
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
31#
 楼主| 发表于 2023-6-29 08:18:08 | 只看该作者
每日一顶 ..........
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
32#
 楼主| 发表于 2023-6-29 08:54:53 | 只看该作者
SolidWorks机械工程师网，顶一下。
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

sunsu168

8

主题

351

帖子

1678

金币

传奇

Rank: 8Rank: 8

积分
5389

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
33#
 楼主| 发表于 2023-6-30 09:44:39 | 只看该作者
SolidWorks机械工程师网，顶一下。
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

yeuser

0

主题

17

帖子

198

金币

侠客

Rank: 3Rank: 3Rank: 3

积分
397

最佳新人宣传达人
34#
发表于 2023-7-21 13:15:23 | 只看该作者
非常不错，求楼主分享！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

zhaozhensheng24

1

主题

408

帖子

242

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1431

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
35#
发表于 2023-7-27 21:48:44 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

钓鱼要戴头盔

1

主题

161

帖子

100

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1036

最佳新人活跃会员热心会员宣传达人灌水之王
36#
发表于 2023-11-25 02:23:05 来自手机 | 只看该作者

   经典案例图书
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

钓鱼要戴头盔

1

主题

161

帖子

100

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1036

最佳新人活跃会员热心会员宣传达人灌水之王
37#
发表于 2023-11-25 02:23:19 来自手机 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

钓鱼要戴头盔

1

主题

161

帖子

100

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1036

最佳新人活跃会员热心会员宣传达人灌水之王
38#
发表于 2023-11-25 02:26:03 来自手机 | 只看该作者

   经典案例图书
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

钓鱼要戴头盔

1

主题

161

帖子

100

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1036

最佳新人活跃会员热心会员宣传达人灌水之王
39#
发表于 2023-11-25 02:26:35 | 只看该作者
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

钓鱼要戴头盔

1

主题

161

帖子

100

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1036

最佳新人活跃会员热心会员宣传达人灌水之王
40#
发表于 2023-11-25 02:28:14 | 只看该作者
SolidWorks机械工程师网，顶一下。
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

下一页 »
123下一页
返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

SOLIDWORKS 2023 机械设计从入门到精通

手机版|小黑屋| GMT+8, 2025-6-26 14:21 , Processed in 1.000821 second(s), 16 queries , Memcache On.

SolidWorks机械工程师网 ( 鲁ICP备14025122号-2 ) 鲁公网安备 37028502190335号

声明：本网言论纯属发表者个人意见，与本网立场无关。
如涉版权，可发邮件： admin@swbbsc.com

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