希望单元格总是显示在屏幕上方?

拼音佳佳 · 发表于 2019-12-17 10:04

本帖最后由拼音佳佳于 2019-12-17 10:10 编辑

写了一段自动化代码受挫,干脆手动解决,写了一堆selection,用眼睛看.

Selection.Offset(8, 0).Select
向下跳转跳转跳转,但是我想看清楚底下的单元格,所以希望Selection总能自动在最上面?

自己解决.
录制的时候,点那两个拉条进行跳转,就有代码了.

ActiveWindow.SmallScroll Down:=8
Selection.Offset(8, 0).Select

liulang0808 · 发表于 2019-12-17 12:27

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Goto Selection, True
End Sub

深秋的黎明 · 发表于 2021-4-20 14:16

liulang0808 发表于 2019-12-17 12:27
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Goto Selection, True
...

哈哈，这段代码找了好久，终于等到你

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

[求助] 希望单元格总是显示在屏幕上方?

最新热点 /1