VBA实现当前工作表翻页

VBA实现当前工作表翻页

在Excel中工作表的切换都需要鼠标点击来切换,能不能还有更简便的呢,当然有~

输入如下代码:

 
  1. Application.SendKeys "{PGUP}", True   
  2.     Application.SendKeys "{PGDN}", True   
  3. 或者   
  4.     ActiveWindow.LargeScroll Down:=1  
  5.     ActiveWindow.LargeScroll Down:=-1  

当然这个代码可以利用控件按钮执行!效果不错!也可利用worksheet事件触发!

分享到:

0 条评论

注意: 评论者允许使用'@user空格'的方式将自己的评论通知另外评论者。例如, ABC是本文的评论者之一,则使用'@ABC '(不包括单引号)将会自动将您的评论发送给ABC。使用'@all ',将会将评论发送给之前所有其它评论者。请务必注意user必须和评论者名相匹配(大小写一致)。

昵称

沙发空缺中,还不快抢~