Excel 宏 VBA 向上滚动不起作用
Excel Macro VBA Scrolling up not working
我当前的 sheet 有第 1-11 行作为冻结窗格,第 12 行到 12.end(xldown) 作为自动过滤器。每当应用过滤器并且我的注意力集中在更高的行(比如第 100 行)时,我的列表看起来很短,因为我的屏幕没有一直向上滚动以显示完整的自动过滤器。我知道简单的解决方案就是向上推我的鼠标滚轮,但这个文件不适合我。
寻找将焦点捕捉到我的自动过滤器的顶部(第一)行的代码。
我试过:
range("c12").select;
range("c12").activate;
range("c11").cells(1,0).select;
range("c11").cells(1,0).activate;
activewindow.scrollrow = 1;
activewindow.scrollrow = 12;
和 none 有效。不知道该尝试什么了。有什么想法吗?
Image of spreadsheet
试试这个
ActiveWindow.SmallScroll down:=1 ' or any number to get what you want
我同意@Corrosive 2,你不应该有分号
我当前的 sheet 有第 1-11 行作为冻结窗格,第 12 行到 12.end(xldown) 作为自动过滤器。每当应用过滤器并且我的注意力集中在更高的行(比如第 100 行)时,我的列表看起来很短,因为我的屏幕没有一直向上滚动以显示完整的自动过滤器。我知道简单的解决方案就是向上推我的鼠标滚轮,但这个文件不适合我。
寻找将焦点捕捉到我的自动过滤器的顶部(第一)行的代码。
我试过:
range("c12").select;
range("c12").activate;
range("c11").cells(1,0).select;
range("c11").cells(1,0).activate;
activewindow.scrollrow = 1;
activewindow.scrollrow = 12;
和 none 有效。不知道该尝试什么了。有什么想法吗?
Image of spreadsheet
试试这个
ActiveWindow.SmallScroll down:=1 ' or any number to get what you want
我同意@Corrosive 2,你不应该有分号