VBA如何让按钮指定按键
答案:2 悬赏:60
解决时间 2021-02-10 13:29
- 提问者网友:枫涩帘淞幕雨
- 2021-02-09 17:34
VBA如何让按钮指定按键
最佳答案
- 二级知识专家网友:疯山鬼
- 2021-02-09 18:56
有【宏按钮 Button 1】 和 【控件窗体按钮 CommandButton1】 两种。
【宏按钮】
图形类别名:msoFormControl
图形类别:Type = 8
默认名称:Button 1
更改按钮名称语句: .AlternativeText = "按钮新名称"
宏调用属性: OnAction "宏名"
宏指定方法: 按钮右键菜单中指定宏
可以任意指定模块或代码页中已有的宏名
【控件按钮】
图形类别名:msoOLEControlObject
图形类别:Type = 12
默认名称:CommandButton1
按钮名称:默认=CommandButton1
更改按钮名称语句: CommandButton1.Caption = "按钮新名称"
宏调用属性: OnAction "" (此属性不用)
宏指定方法:
在代码页的
Private Sub CommandButton1_Click()
End Sub
中写入或编辑代码、
无法在控件菜单中指定模块中已有的宏
但你当然可以这么来:
Private Sub CommandButton1_Click()
Call 宏名
End Sub
【宏按钮】
图形类别名:msoFormControl
图形类别:Type = 8
默认名称:Button 1
更改按钮名称语句: .AlternativeText = "按钮新名称"
宏调用属性: OnAction "宏名"
宏指定方法: 按钮右键菜单中指定宏
可以任意指定模块或代码页中已有的宏名
【控件按钮】
图形类别名:msoOLEControlObject
图形类别:Type = 12
默认名称:CommandButton1
按钮名称:默认=CommandButton1
更改按钮名称语句: CommandButton1.Caption = "按钮新名称"
宏调用属性: OnAction "" (此属性不用)
宏指定方法:
在代码页的
Private Sub CommandButton1_Click()
End Sub
中写入或编辑代码、
无法在控件菜单中指定模块中已有的宏
但你当然可以这么来:
Private Sub CommandButton1_Click()
Call 宏名
End Sub
全部回答
- 1楼网友:心痛成瘾
- 2021-02-09 19:36
在代码中使用sendkeys来模拟按键.
VB代码:
Dim sdstr As System.WinForms.SendKeys
sdstr.Send("{ENTER}")
VBA:(复制textbox1内容到textbox2中)
Me.TextBox1.SetFocus
SendKeys "^A", True
SendKeys "^C", True
Me.TextBox2.SetFocus
SendKeys "^V", True
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯