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,你不应该有分号