指定表以冻结excel中的窗格

时间:2012-01-23 01:30:40

标签: excel

我正在尝试使用excel中的代码冻结窗格。我已经看过几个关于如何使用activewindow做的例子,我试图

从另一张纸上的按钮进行分类。

我有2张,“时间”和“Time_and_Cost”,我在“时间”表上有一个按钮,我想冻结顶行

“Time_and_cost”。

我目前有这个代码用于冻结活动窗口的窗格。

Rows("1:1").Select
ActiveWindow.FreezePanes = True

但是,我如何调整它以指定工作表,我假设我必须选择要冻结的工作表,冻结它,然后

选择以前的工作表?我无法找到要使用的确切代码。

提前致谢

2 个答案:

答案 0 :(得分:0)

这样的事情怎么样:

Public Sub FreezePane()
 Dim shName As String
 shName = ActiveWindow.ActiveSheet.Name
 ActiveWorkbook.Worksheets("Time_and_Cost").Activate
 Range("A2").Activate
 ActiveWindow.FreezePanes = True
 ActiveWorkbook.Worksheets(shName).Activate
End Sub

请注意,我在冻结窗格之前在“Time_and_Cost”上激活A2,以便冻结顶行。

答案 1 :(得分:0)

您可以尝试以下方法。

Sub FreezePanes()
Worksheets("Time_And_Cost").Activate
Rows("2:2").Select
ActiveWindow.FreezePanes = True
End Sub