新足迹

 找回密码
 注册

精华好帖回顾

· TASMANIA东岸游,我想开个新帖 (2015-4-6) 没有袖子的汗衫 · E&E -- 肉饼子蒸蛋。 我的美食处女贴 Ye~~~~~~ (2009-5-3) 知秋一叶
· 利用現有的物件, 做了六套 "wicking pots".... vs “花盆和菜床下藏土地”.... 164# 迷李 wicking (2019-7-11) chcfy · 开个帖子来说说咖啡吧 (2012-10-11) andydeng126
Advertisement
Advertisement
查看: 1598|回复: 3

Excel VBA 如何自定义热键 (Solved out) [复制链接]

发表于 2011-1-7 15:59 |显示全部楼层
此文章由 s970022 原创或转贴,不代表本站立场和观点,版权归 oursteps.com.au 和作者 s970022 所有!转贴必须注明作者、出处和本声明,并保持内容完整
制作一个Excel的表格,有两个按钮(Button1, Button2),都assign了macro,
怎样能自己定义热键去控制这些按钮,例如,我在键盘上按一下A键,Excel就运行Button1上的macro。)

[ 本帖最后由 s970022 于 2011-1-11 09:08 编辑 ]
Advertisement
Advertisement

2010年度奖章获得者

发表于 2011-1-7 17:12 |显示全部楼层
此文章由 dalaohu 原创或转贴,不代表本站立场和观点,版权归 oursteps.com.au 和作者 dalaohu 所有!转贴必须注明作者、出处和本声明,并保持内容完整
A is for auto attack

Ayou

发表于 2011-1-8 06:53 |显示全部楼层
此文章由 s970022 原创或转贴,不代表本站立场和观点,版权归 oursteps.com.au 和作者 s970022 所有!转贴必须注明作者、出处和本声明,并保持内容完整
啥意思?不明白。能直接上代码就给力了。

发表于 2011-1-11 08:12 |显示全部楼层
此文章由 s970022 原创或转贴,不代表本站立场和观点,版权归 oursteps.com.au 和作者 s970022 所有!转贴必须注明作者、出处和本声明,并保持内容完整
用 OnKey

在ThisWorkBook里面放入下面的例子

Private Sub Workbook_Open()
Application.OnKey "{m}", "test"  '用m键call "test"这个procedure
End Sub

Sub test()  'test procedure
MsgBox "Done"
End Sub

发表回复

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Advertisement
Advertisement
返回顶部