[已解决]怎么样快速达到指定的行？

fggf · 发表于 2016-8-21 22:11

达到指定的行.zip (10.13 KB, 下载次数: 2)

scl5801 · 发表于 2016-8-21 22:28

这个最佳答案由 scl5801 给出，感谢 scl5801 的回答。

单击隐藏图章

是这意思？

fggf · 发表于 2016-8-21 22:51

scl5801 发表于 2016-8-21 22:28
是这意思？

底部2是我要的效果，非常感谢！
不知快速达到顶部要怎么解决呢？就是右边滚动条达到最底端的效果。

fjmxwrs · 发表于 2016-8-21 23:08

scl5801 发表于 2016-8-21 22:28
是这意思？

可以简单点

Sub ZDB()
Range("B65536").End(xlUp).Select
End Sub
Sub ZD()
Range("F7").Select
End Sub
Sub ZDB2()
Columns("B:B").Find(0, LookIn:=xlValues, LookAt:=True).Select
End Sub

复制代码

scl5801 · 发表于 2016-8-21 23:16

fggf 发表于 2016-8-21 22:51
底部2是我要的效果，非常感谢！
不知快速达到顶部要怎么解决呢？就是右边滚动条达到最底端的效果。

回顶部，你看滚动条没在顶部，是由于冻结窗口形成的，如果想显示滚动条在顶部，可以取消冻结窗口，执行光标回顶然后再冻结窗口
代码如下：
Sub ZD()
ActiveWindow.FreezePanes = False
Range("h6").Select
ActiveWindow.FreezePanes = True
Range("B3").Select
End Sub

scl5801 · 发表于 2016-8-21 23:17

fjmxwrs 发表于 2016-8-21 23:08
可以简单点

学习啦

su45 · 发表于 2016-8-21 23:35

多看下帮助就能解决的

		自动登录	找回密码
密码			注册

[已解决]怎么样快速达到指定的行？

评分