Excelは、あらゆる種類のデータを追跡するための便利なツールです。多くの人が職場でそれを使用して、さまざまな部門やプロジェクトのアドホックレポートを作成しています。データを操作するときに、特定の列の内容が変更されたときに改ページを自動的に挿入する方法について疑問に思うかもしれません。たとえば、部門名を含む列があり、各部門を新しいページから開始したい場合があります。

これは、Excelの組み込みの小計機能を使用して行うのはかなり簡単です。

あなたがする必要があるのはこれらの一般的なステップに従うことです：

。テーブルに列ラベルが含まれていることを確認してください。たとえば、列Aに部門名が含まれている場合、セルA1には「Department」などのラベルを含めることができます。すべての列にラベルが付いていることを確認してください。

。部門列をキーとして使用して、テーブル内のデータを並べ替えます。

。リボンの[データ]タブを表示します。

。テーブル内のセルを選択したまま、[アウトライン]グループの[小計]ツールをクリックします。 Excelに[小計]ダイアログボックスが表示されます。 （図1を参照）

。 At Each Change Inドロップダウンリストを使用して、Departmentを選択します。

。 [関数の使用]ドロップダウンリストを使用して、[カウント]を選択します。

。 [小計の追加先]リストを使用して、小計を表示する列の名前を選択します。

。 [グループ間の改ページ]チェックボックスがオンになっていることを確認します。

。 [OK]をクリックします。 Excelは、指示に従って小計とページ数を追加します。

何らかの理由で小計機能を使用したくない場合は、ワークシート内のすべての改ページを削除してから、適切な場所に新しい改ページを追加するマクロをいつでも作成できます。次のマクロでうまくいきます：

Sub PageBreak()

Dim CellRange As Range     Dim TestCell As Range

Set CellRange = Selection     For Each TestCell In CellRange         ActiveSheet.Rows(TestCell.Row).PageBreak = xlPageBreakNone         If TestCell.Value <> TestCell.Offset(-1, 0).Value Then             ActiveSheet.Rows(TestCell.Row).PageBreak = xlPageBreakManual         End If     Next TestCell End Sub

マクロを使用するには、分割を行うためのキーとして使用するセルから、一番上のセルを除いたものを選択するだけです。たとえば、部門が列Aの行2から37にある場合、A3からA37の範囲を選択します。マクロを実行すると、古い改ページが削除され、新しい改ページが追加されます。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（7991）は、Microsoft Excel 2007、2010、および2013に適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

link条件付き改ページ。