设为首页收藏本站

开启辅助访问切换到宽版

SolidWorks机械工程师网——最大的SolidWorks学习平台»学习社区 › SolidWorks开发与拓展应用 › SolidWorks二次开发（宏，VBA） › 求大神帮忙写一个宏

发新帖

查看: 2111|回复: 9

上一主题

下一主题

求大神帮忙写一个宏

3 主题	24 帖子	153 金币

Rank: 3 Rank: 3 Rank: 3

积分: 351

电梯直达

跳转到指定楼层

楼主

楼主| 发表于 2022-3-12 11:19:57 | 只看该作者回帖奖励

回帖奖励

|倒序浏览 |阅读模式

经典图书

想批量给零件增加几条相同的方程式，求助大神帮忙写个宏

分享到: QQ好友和群 QQ空间 腾讯微博 腾讯朋友

收藏0 转播 教程|习题|模型|技巧0 点赞0 拍砖0

SolidWorks机械工程师网

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

回复

使用道具举报

0 主题	30 帖子	478 金币

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

积分: 1099

沙发

发表于 2022-3-12 15:35:47 | 只看该作者

远东卓越

自己确认方程式内容，直接替换D1@Sketch1,50这2位置就行就行

lValue = MyEqu.Add2(0, """" & "D1@Sketch1" & """=" & "50", True)
lValue = MyEqu.Add2(1, """" & "Boss -Extrude1" & """=" & "50", True)
lValue = MyEqu.Add2(2 ....

复制代码

AddEqu2022-03-12.rar

（12.63 KB, 下载次数: 60 售价: 5 金币 ）

评分

参与人数 1	威望 +5	金币 +40	贡献 +5	收起理由
猪猪侠	+ 5	+ 40	+ 5	赞一个!

查看全部评分

SolidWorks机械工程师网

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

回复支持反对

使用道具举报

wanggang_815912

0 主题	64 帖子	81 金币

Rank: 3 Rank: 3 Rank: 3

积分: 246

板凳

发表于 2022-3-14 12:26:56 | 只看该作者

经典图书

很不错，顶一下！

SolidWorks机械工程师网

回复支持反对

使用道具举报

3 主题	115 帖子	810 金币

Rank: 6 Rank: 6 Rank: 6

积分: 2831

地板

发表于 2022-3-15 09:11:02 | 只看该作者

感谢大神无私分享！！！！！！！！！！

SolidWorks机械工程师网

回复支持反对

使用道具举报

1 主题	235 帖子	559 金币

Rank: 6 Rank: 6 Rank: 6

积分: 2039

5^#

发表于 2022-5-6 13:47:23 | 只看该作者

经典案例图书

很不错，顶一下！

SolidWorks机械工程师网

回复支持反对

使用道具举报

5 主题	444 帖子	16 金币

Rank: 6 Rank: 6 Rank: 6

积分: 2319

6^#

发表于 2022-8-21 19:31:07 | 只看该作者

感谢楼主分享，很不错！

SolidWorks机械工程师网

回复支持反对

使用道具举报

2 主题	305 帖子	83 金币

Rank: 6 Rank: 6 Rank: 6

积分: 1106

7^#

发表于 2022-8-21 22:24:36 | 只看该作者

经典案例图书

楼主太有才了，膜拜中……

SolidWorks机械工程师网

回复支持反对

使用道具举报

1 主题	339 帖子	74 金币

Rank: 6 Rank: 6 Rank: 6

积分: 1080

8^#

发表于 2022-9-17 14:00:01 | 只看该作者

文件改名文件改名

SolidWorks机械工程师网

回复支持反对

使用道具举报

1 主题	339 帖子	74 金币

Rank: 6 Rank: 6 Rank: 6

积分: 1080

9^#

发表于 2022-9-17 14:00:13 | 只看该作者

文件改名文件改名

SolidWorks机械工程师网

回复支持反对

使用道具举报

3 主题	1333 帖子	274 金币

Rank: 8 Rank: 8

积分: 4659

10^#

发表于 2024-7-2 13:38:17 | 只看该作者

经典图书

感谢楼主分享，很不错！

SolidWorks机械工程师网

回复支持反对

使用道具举报

发新帖

关闭卷起

关闭卷起

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

手机版|小黑屋| GMT+8, 2024-9-21 03:35 , Processed in 0.336673 second(s), 26 queries , Memcache On.

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

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

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