打开excel时不能滚动

我有一个用于创build其他文档的一些空白文档。 但是，当我打开空白页面时，我不能向上或向下滚动屏幕，除非我单击Excel并单击回来，或双击单元格然后退出。

我已经尝试了application.enableevents = True，application.screenupdating = True，application.enableanimations = True，但是他们都没有工作。 任何想法如何解决它？

当我将这个文档保存为标准的.xlsx时，问题仍然存在。 无法滚动，除非我select了不同的窗口并返回到Excel，或者双击到单元格中。

滚动条仍然在那里，他们工作，但不是滚轮。 轮子在其他Excel文档中工作，而不是这个。

这里是文档，看看你是否可以弄清楚（这是不是一个好主意，共享与活动连接的文件）。 尝试制作一个问题的video或更好地描述它。

Answer 1

您可以“强制”滚动区域为全部表格。

Sub fix_scroll_area() ThisWorkbook.ActiveSheet.ScrollArea = "" End Sub 

Answer 2

一般来说，滚动区域可以设置为某些东西，而不使用macros。 最简单的解决scheme是去VB编辑器的属性，并删除ScrollArea的地方（见白色箭头）：

如果不是这样的话，可以随意运行这个：

 Sub TestMe With ActiveWindow .DisplayHorizontalScrollBar = True .DisplayVerticalScrollBar = True End With End Sub