Excel冻结太多的行

我试图冻结我的Excel工作表中的前四行,但冻结了20行。 我正在使用下面的VBA代码冻结行:

Range("1:4").Select With ActiveWindow .FreezePanes = True End With 

这是一个截图,添加了一些符号,显示了我想要的内容,以及实际发生的情况。 我滚动了一下显示冻结,你可以看到,第20行跳到36.看起来像G和H之间有一个垂直冻结线,但它并不重要(这可能是右边距分页符)。

任何帮助表示赞赏。 谢谢。

在这里输入图像说明

如果要冻结前4行,请参考第5行。

 Range("5:5").Select With ActiveWindow .FreezePanes = True End With 

请参阅excel vba冻结窗格,而不select和如何避免使用在Excel VBAmacros中select 。

没有.Select。

 With ActiveWindow If .FreezePanes Then .FreezePanes = False .SplitColumn = 0 .SplitRow = 4 .FreezePanes = True End With 

这是与活动单元格,可能不一定出现在选定的范围内。 尝试:

 Range("A5").Activate With ActiveWindow .FreezePanes = True End With