2012-01-23 165 views
0

我試圖在Excel中使用代碼凍結窗格。我已經看到了幾個關於如何使用activewindow來實現的例子,我試圖通過不同的工作表上的按鈕將其設置爲指定表格以凍結窗格excel

我有2張,「時間」和「Time_and_Cost」,我對「時間」片我要凍結的

「Time_and_cost」頂行的按鈕。

我有這個代碼當前凍結活動窗口的窗格。

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

但是,我怎麼能適應這個指定的工作表,我想我必須選擇工作表,凍結,凍結,然後

選擇以前的工作?即時通訊無法找到確切的代碼使用。

在此先感謝

回答

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之前。