提示:其他語言是Google翻譯的。 你可以訪問 English 版本。
登入
x
or
x
x
註冊
x

or

如何一次將凍結/解凍窗格應用於多個工作表?

假設您有一個包含數百個工作表的大型工作簿,現在您需要應用凍結窗格一次凍結所有工作表。 使用Excel的凍結窗格功能,您可以一次只凍結一個工作表,有沒有辦法在Excel中立即凍結或解凍所有工作表?

使用VBA代碼一次性將凍結窗格應用於所有工作表

使用VBA代碼一次性將解凍窗格應用於所有工作表

使用Kutools for Excel單擊一次即可將凍結/解凍窗格應用於所有工作表


將凍結/解凍窗格應用於多個工作表:

Kutools for Excel's 凍結/解凍窗格多個工作表 只需點擊一下,就可以幫助您凍結或解凍工作簿中的所有工作表。

文檔凍結多張工作表1

Kutools for Excel:比200方便的Excel加載項,可以在60天免費試用。 下載並免費試用現在!



您可以使用以下代碼將凍結窗格應用於所有工作表,請按以下步驟操作:

1。 如果要凍結同一位置的所有工作表,請在工作表中選擇一個要凍結的單元格,然後按住 轉移 鍵選擇所有工作表選項卡。

2。 按住 ALT + F11 鍵,然後打開 Microsoft Visual Basic for Applications窗口.

3。 點擊 插入 > 模塊,並將以下代碼粘貼到 模塊窗口.

VBA代碼:在Excel中一次凍結所有工作表

Sub Freeze()
'Update 20140317
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = True
    End With
Next
Application.ScreenUpdating = True
End Sub

4。 然後按 F5 運行此代碼的關鍵,並且所有工作表已應用於凍結窗格在相同的位置。

請注意: 如果沒有選擇所有工作表,並且每​​個工作表的活動單元位於不同位置,則凍結窗格將作為活動單元位於不同位置。


如果您的Excel中有多張工作表應用於凍結窗格,您如何一次解凍它們,除非一個接一個解凍它們?

1。 啟動您的工作簿哪些工作表已應用於凍結窗格。

2。 按住 ALT + F11 鍵,然後打開 Microsoft Visual Basic for Applications窗口.

3。 點擊 插入 > 模塊,並將以下代碼粘貼到 模塊窗口.

VBA代碼:在Excel中一次解凍所有工作表

Sub UnFreeze()
'Update 20140317
Dim Ws As Worksheet
Application.ScreenUpdating = False
For Each Ws In Application.ActiveWorkbook.Worksheets
    Ws.Activate
    With Application.ActiveWindow
        .FreezePanes = False
    End With
Next
Application.ScreenUpdating = True
End Sub

4。 然後按 F5 運行此代碼的關鍵,並且與凍結窗格一起應用的所有工作表都一次解凍。


如果你不熟悉VBA代碼,這裡有一個強大的工具 - Kutools for Excel,其 凍結窗格多個工作表 - 解凍窗格多個工作表 實用程序可以幫助您一次凍結或解凍當前工作簿的所有工作表。

Kutools for Excel : 與超過300方便的Excel加載項,在60天免費試用沒有限制.

如果你已經安裝 kutools為Excel請按照以下步驟進行:

1。 選擇一個您想要為所有工作表應用凍結窗格的單元格,在這種情況下,我單擊單元格B2,參見截圖:

doc凍結所有工作表1-1

2。 然後點擊 企業 > 工作表 > 凍結窗格多個工作表,看截圖:

doc凍結所有工作表2-2

3。 然後您的所有工作表都已應用凍結窗格在單元格B2的相同位置。

備註:如果您想立即解凍它們,只需通過單擊應用解凍窗格多個工作表功能即可 企業 > 工作表 > 解凍窗格多個工作表.

立即下載並免費試用Kutools for Excel!


Kutools for Excel:比200方便的Excel加載項,可以在60天免費試用。 下載並免費試用現在!


相關文章:

如何在Excel中凍結窗格?


Kutools for Excel解決了您的大多數問題,並使您的生產率提高了80%

  • 重用: 快速插入 複雜的公式,圖表 以及你以前用過的任何東西; 加密單元格 密碼; 創建郵件列表 並發送電子郵件...
  • 超級方程式酒吧 (輕鬆編輯多行文字和公式); 閱讀佈局 (輕鬆讀取和編輯大量單元格); 粘貼到過濾範圍...
  • 合併單元格/行/列 不丟失數據; 分裂細胞含量; 組合重複的行/列...防止重複的細胞; 比較範圍...
  • 選擇複製或唯一 行; 選擇空行 (所有細胞都是空的); 超級查找和模糊查找 在許多工作簿中; 隨機選擇......
  • 精確複製 多個單元格而不更改公式參考; 自動創建參考 多張表; 插入項目符號,複選框等等......
  • 提取文本,添加文本,按位置刪除, 刪除空間; 創建和打印分頁小計; 在單元格內容和註釋之間轉換...
  • 超級過濾器 (將過濾方案保存並應用到其他工作表); 高級排序 按月/週/日,頻率等; 特殊過濾器 用粗體,斜體......
  • 結合工作簿和工作表; 根據鍵列合併表; 將數據拆分為多個表格; 批量轉換xls,xlsx和PDF...
  • 超過300強大的功能。 支持Office / Excel 2007-2019和365。 支持所有語言。 在您的企業或組織中輕鬆部署。 全功能30天免費試用。
kte tab 201905

Office選項卡為Office提供選項卡式界面,使您的工作更輕鬆

  • 在Word,Excel,PowerPoint中啟用選項卡式編輯和閱讀,Publisher,Access,Visio和Project。
  • 在同一窗口的新選項卡中打開並創建多個文檔,而不是在新窗口中。
  • 通過50%提高您的工作效率,每天為您減少數百次鼠標點擊!
官方底部
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    JD · 3 years ago
    want to be able to freeze top row on multiple worksheets
  • To post as a guest, your comment is unpublished.
    Kurt · 5 years ago
    I tried this in my workbook and it worked very well.

    thanks
  • To post as a guest, your comment is unpublished.
    Orchid · 5 years ago
    dear all,
    I have a test in my workbook, have a good note that before you apply this macro, please move the mouse to the cell that you need to apply freeze pane in the sheet.
    it's really helpful. this info is what I am looking for.
    thank you very much
    Lan