メインコンテンツへスキップ

Kutools for Office — 1つのスイート、5つのツールで、もっと多くのことを成し遂げましょう。

複数のワークシートに一度にウィンドウ枠の固定/解除を適用するにはどうすればよいですか?

Author Xiaoyang Last modified

数十、数百ものワークシートを含む大規模なExcelワークブックを使用している場合、特定の行や列を常に表示するためにウィンドウ枠を固定する必要が頻繁に発生します。しかし、Excelのデフォルトの「ウィンドウ枠の固定」機能はアクティブなワークシートに対してのみ動作し、すべてのシートでこの操作を手動で繰り返すのは非常に時間がかかります。もし、すべてのワークシートで同じ行や列を一貫して固定(または後で解除)する必要がある場合、すべてのワークシートに一度にこの設定を適用する方法はありますか?これにより、作業時間を短縮でき、シートを見逃すリスクも軽減できます。

VBAコードを使用してすべてのワークシートに一度にウィンドウ枠の固定を適用する

VBAコードを使用してすべてのワークシートに一度にウィンドウ枠の解除を適用する

Kutools for Excelでワンクリックですべてのワークシートにウィンドウ枠の固定/解除を適用する


VBAコードを使用してすべてのワークシートに一度にウィンドウ枠の固定を適用する

ワークブック内のすべてのワークシートで同じセル位置にウィンドウ枠を固定したい場合、VBAを使用することで効率的にこのプロセスを自動化できます。たとえば、ヘッダー行や主要な列を常に表示したままにしておきたい大規模なワークブック全体で一貫性のあるビューを維持するのに役立ちます。ただし、この方法では、各ワークシート内で固定したいセルを選択する必要があります。VBAは各ワークシート内でアクティブなセルに基づいて処理を行います。

1. すべてのワークシートで同じ位置にウィンドウ枠を固定したい場合は、固定したいセルを選択し、Shiftキーを押しながらすべてのシートタブを選択します。

2. ALT + F11キーを押してMicrosoft Visual Basic for Applicationsウィンドウを開きます。

3. VBAエディター画面でInsert > Moduleをクリックし、次のVBAコードをモジュールウィンドウにコピー&ペーストします。

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キーを押すか、Runボタンをクリックします。これにより、すべてのワークシートでアクティブなセルの位置にウィンドウ枠が固定されます。

注意: すべてのワークシートを選択していない場合、かつ各シートのアクティブなセルが異なる場合、ウィンドウ枠の位置がシートごとに異なります。均一性を確保するため、コードを実行する前に必ずアクティブなセルを揃えてください。


VBAコードを使用してすべてのワークシートに一度にウィンドウ枠の解除を適用する

複数のワークシートにウィンドウ枠が適用されており、それをすべてのシートから同時に削除したい場合、VBAソリューションがこのプロセスを大幅に簡素化します。以下のようなマクロを使用すると、手動でシートごとに設定を解除する代わりに、すべてのワークシートのウィンドウ枠を迅速に解除できます。

1. 複数のワークシートにウィンドウ枠が固定されているワークブックを開きます。

2. ALT + F11キーを押してMicrosoft Visual Basic for Applicationsエディターを起動します。

3. Insert > Moduleをクリックし、以下のコードをモジュールウィンドウに貼り付けます。

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キーを押すか、Runボタンをクリックします。ウィンドウ枠が固定されているすべてのワークシートから瞬時に解除されます。


Kutools for Excelでワンクリックですべてのワークシートにウィンドウ枠の固定/解除を適用する

VBAを使用したくない場合や、よりシンプルでコード不要の方法を探している場合、Kutools for Excelは直感的なメニューを使ってすべてのワークシートにウィンドウ枠の固定や解除を適用する効果的な方法を提供します。この機能は最小限のステップで確実なソリューションを求めるユーザーにとって理想的で、マクロの設定も必要ありません。「複数のワークシートのウィンドウ枠を固定する」および「複数のワークシートのウィンドウ枠の固定を解除する」機能は、すべてのワークシートで一度に設定を適用または解除する際にシームレスに動作します。これにより、大規模なワークブックでの作業時間を大幅に節約し、シート間の不整合を低減できます。

注意: 「 複数のワークシートのウィンドウ枠を固定する」を使用するには 、まず Kutools for Excel をダウンロードしてインストールする必要があります。インストール後、以下に説明するように簡単に機能にアクセスできます。

Kutools for Excelをインストール後、以下の手順に従ってください:

1. すべてのワークシートでウィンドウ枠を固定したいセルを選択します(例: 行1と列Aを常に表示したい場合は、B2を選択)。この位置はすべてのワークシートに一様に適用されます。スクリーンショットをご覧ください:

A screenshot showing how to select a cell in Excel for applying freeze panes across all worksheets

2. Excelリボン上でKutools Plus > ワークシート > 複数のワークシートのウィンドウ枠を固定する をクリックします。スクリーンショットをご覧ください:

A screenshot showing the Freeze Panes option in Kutools for Excel to freeze multiple worksheets at once

3. すべてのワークシートで指定されたセル位置(例: B2)にウィンドウ枠が固定され、ワークブック全体で一貫したビューが維持されます。

注意: すべてのワークシートから一度にウィンドウ枠を削除するには、Kutools Plus > ワークシート > 複数のワークシートのウィンドウ枠の固定を解除する を選択します。これは大規模または複雑なデータセットを扱う際、必要に応じてビューを切り替える柔軟性を提供します。この機能は特にテンプレート準備中や会議中、またはいつでも迅速にナビゲーションの一貫性を保ちたい場合に役立ちます。


デモ: Kutools for Excelでワンクリックですべてのワークシートにウィンドウ枠の固定/解除を適用する

 
Kutools for Excel: あなたの指先に 300 以上の便利なツールが集結!永久無料のAI機能をお楽しみください!今すぐダウンロード!

最高のオフィス業務効率化ツール

🤖 Kutools AI Aide:データ分析を革新します。主な機能:Intelligent Executionコード生成カスタム数式の作成データの分析とグラフの生成Kutools Functionsの呼び出し……
人気の機能重複の検索・ハイライト・重複をマーキング空白行を削除データを失わずに列またはセルを統合丸める……
スーパーLOOKUP複数条件でのVLookup複数値でのVLookup複数シートの検索ファジーマッチ……
高度なドロップダウンリストドロップダウンリストを素早く作成連動ドロップダウンリスト複数選択ドロップダウンリスト……
列マネージャー指定した数の列を追加列の移動非表示列の表示/非表示の切替範囲&列の比較……
注目の機能グリッドフォーカスデザインビュー強化された数式バーワークブック&ワークシートの管理オートテキスト ライブラリ日付ピッカーデータの統合セルの暗号化/復号化リストで電子メールを送信スーパーフィルター特殊フィルタ(太字/斜体/取り消し線などをフィルター)……
トップ15ツールセット12 種類テキストツールテキストの追加特定の文字を削除など)50種類以上のグラフガントチャートなど)40種類以上の便利な数式誕生日に基づいて年齢を計算するなど)19 種類の挿入ツールQRコードの挿入パスから画像の挿入など)12 種類の変換ツール単語に変換する通貨変換など)7種の統合&分割ツール高度な行のマージセルの分割など)… その他多数
Kutoolsはお好みの言語で利用可能 ― 英語、スペイン語、ドイツ語、フランス語、中国語、その他40以上の言語に対応!

Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体感しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と保存時間を実現します。最も必要な機能はこちらをクリック...


Office TabでOfficeにタブインターフェースを追加し、作業をもっと簡単に

  • Word、Excel、PowerPointでタブによる編集・閲覧を実現
  • 新しいウィンドウを開かず、同じウィンドウの新しいタブで複数のドキュメントを開いたり作成できます。
  • 生産性が50%向上し、毎日のマウスクリック数を何百回も削減!

全てのKutoolsアドインを一つのインストーラーで

Kutools for Officeスイートは、Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proをまとめて提供。Officeアプリを横断して働くチームに最適です。

Excel Word Outlook Tabs PowerPoint
  • オールインワンスイート — Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proが含まれます
  • 1つのインストーラー・1つのライセンス —— 数分でセットアップ完了(MSI対応)
  • 一括管理でより効率的 —— Officeアプリ間で快適な生産性を発揮
  • 30日間フル機能お試し —— 登録やクレジットカード不要
  • コストパフォーマンス最適 —— 個別購入よりお得