excelvba冻结窗格没有选择-excelvbafreezepanewithoutselect

22  

Record yourself using the View ► Freeze Panes ► Freeze Top Row command and this is what you get for .FreezePanes.

使用视图►冻结窗格►冻结顶行命令记录自己，这就是.FreezePanes的功能。

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

So modifying the .SplitColumn and/or .SplitRow properties should do it for you regardless on what the ActiveCell property is.

因此，无论ActiveCell属性是什么，修改.SplitColumn和/或.SplitRow属性都应该为您完成。

0  

I know this is old but I came across this tidbit that may be useful... as ChrisB stated, the SplitColumn/SplitRow values represent the last cell above/left of the split BUT of the currently visible window. So if you happen to have code like this:

我知道这是旧的，但我遇到了这个可能有用的信息......正如ChrisB所说，SplitColumn / SplitRow值代表当前可见窗口的分割BUT上方/左边的最后一个单元格。所以，如果您碰巧有这样的代码：

Application.Goto Worksheets(2).Range("A101"), True
With ActiveWindow
 .SplitColumn = 0
 .SplitRow = 10
 .FreezePanes = True
End With

The split will be between rows 110 and 111 instead of 10 and 11.

分割将在行110和111之间而不是10和11之间。