我提供思路: 在Word和Excel中可以设置宏运行的快捷键 在PowerPoint中比尔没做 (如果你没在WordExcel中设置快捷键调用宏,现在可以试试。看看效果) 我们可以自己编辑! 开始幻灯片放映,立即运行宏,在宏中可以调用子宏,也可以调用自编函数 比如 Dim PageNO PageNO=Application.InputBox(prompt:='Enter the PageNO:',Title:='幻灯片放映转页',type:=1) GotoPage(PageNO) Excel的Onkey方法 例 option Explicit sub SetShortKeys() with Application .onkey key="^+1",Procedure:="GoTOPage(PageNo)" .onkey key="^+2",Procedure:="TheNext()"end with end sub sub TheNext() {} sub GoTOPage(PageNO) {} Word的KeyBindings方法 先写到这 这段时间又忙考研 又正学Java 顺手把VBA5开发人员指南翻了一下 我再看看 大家一起研究研究吧 先参照写一下,不过挺麻烦
首先在powerpoint中操作并录制宏
然后找出控制播放顺序的关键字段 然后模拟键盘发送命令
或者做在keypress事件中
头疼呀,快来帮帮我
播放powerpoint时直接按快捷键进行链接?
在powerpoint里面有快捷键N是下一张 P是上一张
你在播放幻灯片时 查看帮助有
在Word和Excel中可以设置宏运行的快捷键
在PowerPoint中比尔没做
(如果你没在WordExcel中设置快捷键调用宏,现在可以试试。看看效果)
我们可以自己编辑!
开始幻灯片放映,立即运行宏,在宏中可以调用子宏,也可以调用自编函数
比如
Dim PageNO
PageNO=Application.InputBox(prompt:='Enter the PageNO:',Title:='幻灯片放映转页',type:=1)
GotoPage(PageNO)
Excel的Onkey方法
例
option Explicit
sub SetShortKeys()
with Application
.onkey key="^+1",Procedure:="GoTOPage(PageNo)"
.onkey key="^+2",Procedure:="TheNext()"end with
end sub
sub TheNext()
{}
sub GoTOPage(PageNO)
{}
Word的KeyBindings方法
先写到这 这段时间又忙考研 又正学Java 顺手把VBA5开发人员指南翻了一下
我再看看 大家一起研究研究吧
先参照写一下,不过挺麻烦
问题不就好解决了嘛。做个窗体,让用户看不见,但可以接受键盘事件。提花有偿技术支持。
CO.:Vansoft Workroom
MSN:[email protected]
QQ:5537350
Email:[email protected]
[email protected]
TEL:025-86685867(范)