iCAx开思网

标题: 求大神做个solidworks快捷键的宏 [打印本页]

作者: chaomogu    时间: 2018-1-11 00:38
标题: 求大神做个solidworks快捷键的宏
具体要求是点击宏后执行一个命令(做出来了就是设置快捷键了),打开
[attach]1254011[/attach][attach]1254010[/attach]
这样一个界面(1、这个界面要么在编程界面设置好2、要么多个设置调取快捷键3、或者直接可以实现把solidworks功能键拖动上去)
图标全部按圆环排列,内外多个环(最好能改变还的大小和分布数目,如一圈8/12个快捷键),用久了,找功能就不用满屏点,作图速度稳稳提高。

然后选中就执行命令,托盘消失。不选择按esc退出命令。
为什么有上面的想法,,虽然看了悶大的多字母快捷鍵宏,但感觉还是不夠好使,而且感觉用宏会卡顿一下。然後感觉solidworks设置快捷键还不够好使,鼠标8/12键(用过都知道,效率很高)不够用。
草图,零件,工程图,装配体,各个环境不一样,命令不一样。
设置键盘快捷键真是记不过来。
尤其是要带ctrl或shift
s键按出来的排版又不好
[attach]1254012[/attach]
分布成一个圆就习惯的往那个方向选,用过鼠标手势的都有实际体会,可以说是盲操作,不用找。
有人让我点选工具栏的命令,但那样需要满屏找,效率降低,不能专心作画。


作者: chaomogu    时间: 2018-1-11 09:20
如果能做到像按s键这样出来的界面,这功能就好用了
作者: chaomogu    时间: 2018-1-11 15:01
这是solidworks自带的 [attach]1254027[/attach]  默认快捷键s,调出来后还可以添加或删除快捷键上去。  现在想做一个宏,执行后实现同样功能。请问能实现吗


作者: chaomogu    时间: 2018-1-11 15:39
请教了一些人,好像不容易实现,现在我退一步。请问下用宏怎么执行拉伸这个命令。录制宏后不会修改

作者: qiminger    时间: 2018-1-12 08:12
chaomogu 发表于 2018-1-11 15:39
请教了一些人,好像不容易实现,现在我退一步。请问下用宏怎么执行拉伸这个命令。录制宏后不会修改

Dim retval As Long

retval = swApp.RunCommand(swCommands_ExtrudedBossBase, Empty) '拉伸


作者: chaomogu    时间: 2018-1-12 10:49
qiminger 发表于 2018-1-12 08:12
Dim retval As Long

retval = swApp.RunCommand(swCommands_ExtrudedBossBase, Empty) '拉伸

谢了,昨天有人告诉了我另一种

Sub main(): Application.SldWorks.RunCommand swCommands_ExtrudedBossBase, "": End Sub

请问下把这句链接到按钮,应该加什么





欢迎光临 iCAx开思网 (https://www.icax.org/) Powered by Discuz! X3.3