小計行のフォーマット(Microsoft Excel)
小計をワークシートに追加すると、Excelは太字のフォントを使用して小計を自動的にフォーマットします。ただし、小計を黄色や別の色でシェーディングするなど、小計に別の種類の書式を設定することもできます。
小計を控えめに使用し、1つまたは2つのワークシートに異なる形式のみを適用する場合は、次の一般的な手順に従うことができます。
。必要に応じて、小計を適用します。
。小計を含むデータテーブル全体を選択します。
。画面の左側にある[アウトライン]領域を使用して、ワークシートの詳細を折りたたんで、小計のみが表示されるようにします。
。 F5キーを押して、[移動]ダイアログボックスを表示します。 (図1を参照)
。 [特別]をクリックして、[特別に移動]ダイアログボックスを表示します。 (図2を参照)
。 Visible CellsOnlyオプションボタンを選択します。
。 [OK]をクリックします。これで、表示されている小計行のみが選択されます。
。必要に応じて、フォーマットを適用します。
同じデータテーブルに小計を繰り返し追加および削除する場合は、条件付き書式を使用して目的の小計書式を適用することをお勧めします。次の手順に従ってください:
。小計を適用する前に、データテーブル全体を選択してください。
。 「フォーマット」メニューから「条件付きフォーマット」を選択します。 Excelは、[条件付き書式]ダイアログボックスを表示します。
。左端のドロップダウンリストで、[数式]を選択します。ダイアログボックスは、選択内容を反映して変化します。 (図3を参照)
。手順3で使用したドロップダウンリストのすぐ右側にある数式ボックスに、次の数式を入力します:= ISNUMBER(FIND( “Grand Total”、$ A1))。 [フォーマット]をクリックして、[セルのフォーマット]ダイアログボックスを表示します。
。ダイアログボックスのコントロールを使用して、総計行に適用するフォーマットを設定します。
。 [OK]をクリックして、[セルの書式設定]ダイアログボックスを閉じます。
。 [追加]をクリックします。 Excelは2番目の条件付き形式を追加します。
。 2番目の条件の左端のドロップダウンリストで、[式]を選択します。ダイアログボックスは、選択内容を反映して変化します。
。手順9で使用したドロップダウンリストのすぐ右側にある数式ボックスに、次の数式を入力します:= ISNUMBER(FIND( “Total”、$ A1))。 [フォーマット]をクリックして、[セルのフォーマット]ダイアログボックスを表示します。 (図4を参照)
。ダイアログボックスのコントロールを使用して、[合計]行に適用するフォーマットを設定します。
。 [OK]をクリックして、[セルの書式設定]ダイアログボックスを閉じます。
。 [OK]をクリックして、[条件付き書式]ダイアログボックスを閉じます。
上記の手順を実行するときは、必ずA1(手順4および10)を小計が追加される列に置き換えてください。したがって、小計が列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トレーニングのソースです。
このヒント(2984)は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel(Excel 2007以降)のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。