Excel宏VBA向上滚动不起作用

时间:2017-11-16 12:00:51

标签: excel vba excel-vba setfocus

我当前的工作表有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;

并且没有工作。不知道该怎么办。任何想法?

Image of spreadsheet

1 个答案:

答案 0 :(得分:0)

试试这个

ActiveWindow.SmallScroll down:=1  ' or any number to get what you want

我同意@Corrosive 2,你不应该有分号