VBA实现当前工作表翻页

• VBA • 暂无评论 • •3,885 次查阅

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必须和评论者名相匹配(大小写一致)。

昵称▼

沙发空缺中，还不快抢~