一度に複数のワークシートにフリーズ/フリーズ解除ペインを適用するにはどうすればよいですか？

何百ものワークシートを含む大きなワークブックがあり、フリーズペインを適用してすべてのワークシートを一度にフリーズする必要があるとします。 Excelのペインのフリーズ機能を使用すると、一度にXNUMXつのワークシートのみをフリーズできますが、Excelですべてのワークシートを一度にフリーズまたはフリーズ解除する方法はありますか？

VBAコードを使用して、すべてのワークシートにフリーズペインを一度に適用します

VBAコードを使用して、すべてのワークシートにUnfreezePanesを一度に適用します

Kutools for Excelを使用して、ワンクリックですべてのワークシートにフリーズ/フリーズ解除ペインを一度に適用します

VBAコードを使用して、すべてのワークシートにフリーズペインを一度に適用します

次のコードを使用して、フリーズペインをすべてのワークシートに適用できます。次の手順で実行してください。

1。 すべてのワークシートを同じ位置でフリーズする場合は、ワークシートでフリーズするセルを選択して、押し続けます シフト キーを押して、すべてのシートタブを選択します。

2。 を押し続けます Alt + F11 キー、そしてそれは開きます Microsoft Visual Basic forApplicationsウィンドウ.

3に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュールウィンドウ.

VBAコード：Excelですべてのワークシートを一度にフリーズします

Sub Freeze()
'Updateby Extendoffice
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 このコードを実行するにはキーを押します。すべてのワークシートは、フリーズペインが同じ位置にある状態で適用されています。

ご注意： すべてのワークシートが選択されておらず、各ワークシートのアクティブセルが異なる位置にある場合、フリーズペインはアクティブセルの異なる場所に配置されます。

VBAコードを使用して、すべてのワークシートにUnfreezePanesを一度に適用します

Excelのフリーズペインで複数のワークシートが適用されている場合、XNUMXつずつフリーズ解除する以外に、一度にフリーズ解除するにはどうすればよいですか？

1。 フリーズペインで適用されたワークシートをワークブックで起動します。

2。 を押し続けます Alt + F11 キー、そしてそれは開きます Microsoft Visual Basic forApplicationsウィンドウ.

3に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュールウィンドウ.

VBAコード：Excelですべてのワークシートを一度に解凍します

Sub UnFreeze()
'Updateby Extendoffice
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 このコードを実行するためのキーを押すと、フリーズペインで適用されたすべてのワークシートが一度にフリーズ解除されました。

Kutools for Excelを使用して、ワンクリックですべてのワークシートにフリーズ/フリーズ解除ペインを一度に適用します

VBAコードに慣れていない場合は、ここに強力なツールがあります- Kutools for Excel、 その ペインをフリーズする複数のワークシート • ペインのフリーズを解除する複数のワークシート ユーティリティを使用すると、現在のブックのすべてのワークシートを一度にフリーズまたはフリーズ解除できます。

インストールした後 Kutools for Excel、次のようにしてください。

1。 すべてのワークシートにフリーズペインを適用するセルを選択します。この場合、セルB2をクリックします。スクリーンショットを参照してください。

2。 次に、をクリックします クツールズプラス > ワークシート > ペインをフリーズする複数のワークシート、スクリーンショットを参照してください：

3。 そして、すべてのワークシートがセルB2の同じ位置にフリーズペインに適用されました。

Note：すぐにフリーズを解除したい場合は、[ペインのフリーズ解除]複数のワークシート機能をクリックして適用する必要があります。 クツールズプラス> ワークシート > ペインのフリーズを解除する複数のワークシート.

今すぐExcel用のKutoolsをダウンロードして無料トライアル！

デモ：Kutools for Excelを使用して、ワンクリックですべてのワークシートにペインのフリーズ/フリーズ解除を一度に適用します