同时按Alt和F11进入宏界面,插入,模块,粘贴如下代码:
Dim iFlag As Boolean
Dim i As Integer
Sub MoveDown()
If iFlag Then
iFlag = False
Else
If i = 12 Then
i = 0
Else
i = i + 1
End If
Range("A" & i * 28 + 17).Select
Application.OnTime Now + TimeValue("0:0:2"), "movedown"
End If
End Sub
Sub StopM()
iFlag = True
End Sub
粗体的12表示12页;粗体的0:0:2表示2秒(你改为0:0:5就是5秒)。
粗体的28和17,不太好理解:以我现在的Excel文件为列,头4行冻结,大约28行是一页(实际32行,因为还有4行冻结行);而17确保每翻一页正好是28行。你自己试着调整吧。
然后回到Excel里,在前4行的某地方插入两个形状(比如文本框之类的,一个写翻页,一个写停止),右键点形状,分别制定宏为MoveDown和StopM,可以了。
望采纳
1、我们首先将WPS表格这款软件打开,进入到WPS表格的操作界面。
2、打开WPS表格之后,在菜单里找到开发工具选项。
3、点击开发工具选项,在其内找到滚动条选项。
4、选择滚动条我们在表格内画出需要的滚动条。
5、双击滚动条选项进入其属性操作界面,在该界面内我们设置滚动条的颜色。
6、设置好之后,我们再在开发工具选项内找到退出设计选项。
7、点击退出设计选项,我们就可以使用这个滚动条了。