小計をワークシートに追加すると、Excelは太字のフォントを使用して小計を自動的にフォーマットします。ただし、小計を黄色や別の色でシェーディングするなど、小計に別の種類の書式を設定することもできます。

小計を控えめに使用し、1つまたは2つのワークシートに異なる形式のみを適用する場合は、次の一般的な手順に従うことができます。

。必要に応じて、小計を適用します。

。小計を含むデータテーブル全体を選択します。

。画面の左側にある[アウトライン]領域を使用して、ワークシートの詳細を折りたたんで、小計のみが表示されるようにします。

。 F5キーを押して、[移動]ダイアログボックスを表示します。 (図1を参照)

。 [特別]をクリックして、[特別に移動]ダイアログボックスを表示します。 (図2を参照)

。 Visible CellsOnlyオプションボタンを選択します。

。 [OK]をクリックします。これで、表示されている小計行のみが選択されます。

。必要に応じて、フォーマットを適用します。

同じデータテーブルに小計を繰り返し追加および削除する場合は、条件付き書式を使用して目的の小計書式を適用することをお勧めします。次の手順に従ってください:

。小計を適用する前に、データテーブル全体を選択してください。

。リボンの[ホーム]タブが表示されていることを確認します。

。条件付き書式ツールをクリックします。 Excelは一連の選択肢を表示します。

。 [ルールの管理]をクリックします。 Excelは、[条件付き書式ルールマネージャー]ダイアログボックスを表示します。

。 [新しいルール]をクリックします。 Excelは、[新しい書式設定ルール]ダイアログボックスを表示します。

(図3を参照)

。ダイアログボックスの上部にある[ルールタイプの選択]領域で、[数式を使用してフォーマットするセルを決定する]を選択します。 Excelは、[新しい書式設定ルール]ダイアログボックスの外観を変更します。

。数式スペースに、次の数式を入力します。

ISNUMBER(FIND( “総計”、$ A1))。 [フォーマット]をクリックして、[セルのフォーマット]ダイアログボックスを表示します。

。ダイアログボックスのコントロールを使用して、総計行に適用するフォーマットを設定します。

。 [OK]をクリックして、[セルの書式設定]ダイアログボックスを閉じます。

。 [OK]をクリックして、[新しい書式設定ルール]ダイアログボックスを閉じます。作成したルールが[条件付き書式ルールマネージャー]ダイアログボックスに表示されます。

。 [新しいルール]をクリックします。 Excelは、[新しい書式設定ルール]ダイアログボックスを再度表示します。

。ダイアログボックスの上部にある[ルールタイプの選択]領域で、[数式を使用してフォーマットするセルを決定する]を選択します。

。数式ボックスに、次の数式を入力します。

ISNUMBER(FIND( “Total”、$ A1))。 [フォーマット]をクリックして、[セルのフォーマット]ダイアログボックスを表示します。 (図4を参照)

。ダイアログボックスのコントロールを使用して、[合計]行に適用するフォーマットを設定します。

。 [OK]をクリックして、[セルの書式設定]ダイアログボックスを閉じます。

。 [OK]をクリックして、[新しい書式設定ルール]ダイアログボックスを閉じます。

。上下の矢印をクリックして、作成したルールを評価する順序に移動します。

。 [OK]をクリックして、[条件付き書式ルールマネージャー]ダイアログボックスを閉じます。

上記の手順を実行するときは、必ずA1(手順7および14)を小計が追加される列に置き換えてください。したがって、小計が列Gにある場合は、A1の代わりにG1を使用します。

かなりの数のワークシートで小計をフォーマットする必要がある場合は、フォーマットを実行するマクロを作成することをお勧めします。次のマクロは、選択した範囲内のすべてのセルを調べ、必要に応じてセルの色付けを適用します。

Sub FormatTotalRows()

Dim rCell as Range

For Each rCell In Selection         If Right(rCell.Value, 5) = "Total" Then             Rows(rCell.Row).Interior.ColorIndex = 36         End If

If Right(rCell.Value, 11) = "Grand Total" Then             Rows(rCell.Row).Interior.ColorIndex = 44         End If     Next End Sub

マクロは小計行を黄色に、総計行をより暗い黄色に着色します。 (システムの正確な色は、ロードしたテーマによって異なる場合があります。)マクロは本質的に単純ですが、選択した範囲のすべてのセルが検査されるため、効率が低下します。それにもかかわらず、10列5000行のワークシートでは、このマクロは5秒未満で実行されます。

注:

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

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

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