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

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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

SolidWorks机械工程师网——最大的SolidWorks学习平台»学习社区 › SolidWorks开发与拓展应用 › SolidWorks二次开发（宏，VBA） › 【更新】粗糙度基准形位公差插入宏
123下一页
返回列表 发新帖
查看: 8119|回复: 58
打印 上一主题 下一主题

【更新】粗糙度基准形位公差插入宏

  [复制链接]
shinvis

4

主题

198

帖子

619

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1698

最佳新人活跃会员热心会员宣传达人灌水之王
跳转到指定楼层
楼主
 楼主| 发表于 2025-4-10 22:24:23 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

   经典图书


在之前的基础上增加基准，个人常用形位公差。

使用还是先点要插在哪里再选择内容。
界面做的很紧凑，每人使用习惯不一样，所以也可以按自己喜好做改动。


补充内容 (2025-4-11 13:47):
昨晚搞的略晚了点，简化了内容没有测试，现在看到，有点需要自行去处理：当主要的textbox5.text=""时，不要  -  

粗糙度基准形位.gif

粗糙度基准形位公差-Shinvis.zip

（34.21 KB, 下载次数: 189 售价: 10 金币 ）

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏10 转播转播 分享教程|习题|模型|技巧 点赞点赞 拍砖拍砖
SolidWorks机械工程师网
提示：建议使用谷歌浏览器浏览本网站！如单击这里下载！否则，可能无法下载附件文件！（支持大多数版本的谷歌浏览器，支持360和QQ浏览器的极速模式，即谷歌内核模式，使用IE和Edge浏览器，浏览个别网页以及下载文件时，会误报“***不安全”，此时需要单击“继续访问此不安全站点(不推荐)”才可以继续下载，另外，本网站不含任何不安全的文件，已联系微软公司解决，纯属IE和Edge浏览器误报）
回复

使用道具 举报

shinvis

4

主题

198

帖子

619

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1698

最佳新人活跃会员热心会员宣传达人灌水之王
推荐
 楼主| 发表于 2025-4-10 22:48:52 | 只看该作者
自保留项目

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

使用道具 举报

葛特曼

7

主题

808

帖子

9

金币

长老

Rank: 6Rank: 6Rank: 6

积分
2208

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
推荐
发表于 2025-4-26 11:57:57 | 只看该作者

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

使用道具 举报

jyzas001

3

主题

676

帖子

969

金币

传奇

Rank: 8Rank: 8

积分
6127

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
推荐
发表于 2025-4-11 09:16:23 | 只看该作者
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 0 反对 1

使用道具 举报

Kerwin1314

15

主题

322

帖子

288

金币

传奇

Rank: 8Rank: 8

积分
3857

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
推荐
发表于 2025-4-11 08:02:01 | 只看该作者

   经典案例图书
谢谢大佬，，，昨天我还在想形位的啥时候能好
SolidWorks机械工程师网
回复 支持 0 反对 1

使用道具 举报

yni621

11

主题

504

帖子

1133

金币

传奇

Rank: 8Rank: 8

积分
5859

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
6#
发表于 2025-4-11 08:01:52 | 只看该作者
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

3869

0

主题

613

帖子

461

金币

传奇

Rank: 8Rank: 8

积分
3688

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
7#
发表于 2025-4-11 08:04:35 | 只看该作者

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

使用道具 举报

最熟悉的陌生

0

主题

50

帖子

172

金币

侠客

Rank: 3Rank: 3Rank: 3

积分
491

最佳新人活跃会员宣传达人
8#
发表于 2025-4-11 08:22:41 | 只看该作者
SW机械工程师网，找到组织了！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

wanchengyu2015

1

主题

192

帖子

152

金币

堂主

Rank: 4

积分
926

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

使用道具 举报

黄火山

7

主题

431

帖子

1107

金币

传奇

Rank: 8Rank: 8

积分
5219

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
10#
发表于 2025-4-11 08:24:23 | 只看该作者

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

使用道具 举报

guo_li

2

主题

163

帖子

559

金币

长老

Rank: 6Rank: 6Rank: 6

积分
2303

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

使用道具 举报

董东咚

41

主题

2309

帖子

2974

金币

传奇

Rank: 8Rank: 8

积分
8944

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
12#
发表于 2025-4-11 09:04:18 | 只看该作者
SW机械工程师网，找到组织了！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

why2024

7

主题

1744

帖子

1175

金币

传奇

Rank: 8Rank: 8

积分
5873

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
13#
发表于 2025-4-11 09:16:23 | 只看该作者
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

why2024

7

主题

1744

帖子

1175

金币

传奇

Rank: 8Rank: 8

积分
5873

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
14#
发表于 2025-4-11 09:19:06 | 只看该作者
感谢楼主分享，很不错！
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

jyzas001

3

主题

676

帖子

969

金币

传奇

Rank: 8Rank: 8

积分
6127

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
15#
发表于 2025-4-11 09:37:22 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

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

使用道具 举报

豆腐煮鱼

1

主题

96

帖子

383

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1077

最佳新人活跃会员热心会员宣传达人
16#
发表于 2025-4-11 09:47:43 | 只看该作者

   经典案例图书
感谢分享  实用软件
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

chicheng23

0

主题

401

帖子

378

金币

传奇

Rank: 8Rank: 8

积分
3410

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
17#
发表于 2025-4-11 10:09:49 | 只看该作者
加入QQ群
参与讨论和学习

SolidWorks技术交流群

或扫描二维码加入

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

使用道具 举报

-Duxep

1

主题

68

帖子

70

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1041

最佳新人活跃会员热心会员宣传达人
18#
发表于 2025-4-11 10:52:15 | 只看该作者

   经典案例图书

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

使用道具 举报

why2024

7

主题

1744

帖子

1175

金币

传奇

Rank: 8Rank: 8

积分
5873

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
19#
发表于 2025-4-11 11:51:28 | 只看该作者
楼主指导指导，直接运行宏无反应，只能编译宏，运行MAIN,才行。运行CCD也不行？

直接运行不了

直接运行不了

运行CCD无反应

运行CCD无反应

编译下运行main可以

编译下运行main可以

引用

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

使用道具 举报

Kerwin1314

15

主题

322

帖子

288

金币

传奇

Rank: 8Rank: 8

积分
3857

最佳新人活跃会员热心会员宣传达人灌水之王突出贡献
20#
发表于 2025-4-11 13:19:35 | 只看该作者
why2024 发表于 2025-4-11 11:51
楼主指导指导，直接运行宏无反应，只能编译宏，运行MAIN,才行。运行CCD也不行？

去看看扫盲贴，你会恍然大悟的
SolidWorks机械工程师网
回复 支持 反对

使用道具 举报

shinvis

4

主题

198

帖子

619

金币

长老

Rank: 6Rank: 6Rank: 6

积分
1698

最佳新人活跃会员热心会员宣传达人灌水之王
21#
 楼主| 发表于 2025-4-11 13:55:33 | 只看该作者
昨晚简化了内容，有个内容没注意到，在 setGlot sub 里改一下
找到Set myGtol = Part.InsertGtol()下
If TextBox5.Text = "" Then
   myGtol.SetFrameValues 1, TextBox3.Text, "", TextBox4.Text, "", ""
   Else
   myGtol.SetFrameValues 1, TextBox3.Text, "", TextBox4.Text & "-" & TextBox5.Text, "", ""
   End If

粗糙度基准形位公差 -1.rar

（27.77 KB, 下载次数: 52 售价: 10 金币 ）

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

使用道具 举报

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

本版积分规则

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

手机版|小黑屋| GMT+8, 2025-5-24 13:29 , Processed in 0.304538 second(s), 25 queries , Memcache On.

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

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

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