Excelでヘッダー/最初の行を除いた列全体を合計するにはどうすればよいですか？

ワークシートに長い値のリストがあり、このリストにいくつかの値を追加したり削除したりすることがあります。このような場合、どのようにして自動的にそれらの合計を最初のセルに表示させることができますか？ここで、Excelでヘッダーや最初の行を除いた列全体を合計する必要があります。

Excelで数式を使用してヘッダーを除いた列全体を合計する

Excelで関数を使用してヘッダーを除いた列全体を合計する

Excelで数式を使用してヘッダーを除いた列全体を合計する

Excelでは、ほとんどのユーザーにとって数式を使うことが簡単で良い選択です。

Excel 2007/2010/2013では、この数式 =SUM(A2:A1048576)（Aは合計したい列）をリストの最初のセルに入力し、キーボードのEnterキーを押します。これにより、リストの合計が最初のセルに表示され、リストが変更されると自動的に更新されます。

ヒント: Excel 2003では、この数式 =SUM(A2:A655366) を使用できます。

Excelで関数を使用してヘッダーを除いた列全体を合計する

関数を使用しても、Excelでヘッダーを除いた列全体を合計することができます。

1. 合計したい列のセルを選択し、Alt + F11 キーを押して Microsoft Visual Basic for Applications ウィンドウを開きます。

2. 表示されたウィンドウで、[挿入] > [モジュール] をクリックし、次のVBAコードをモジュールに貼り付けます。

VBA：数字のみを抽出

Public Function SumColumn(pRng As Range) As Double
'Updateby20140510
Dim xColIndex As Integer
Dim xRowIndex As Integer
Dim ws As Worksheet
Set pRng = pRng.Columns(1)
Set ws = pRng.Parent
xIndex = pRng.Column
xRowIndex = ws.Cells(Rows.Count, xIndex).End(xlUp).Row
Set pRng = ws.Range(ws.Cells(2, xIndex), ws.Cells(xRowIndex, xIndex))
SumColumn = Application.WorksheetFunction.Sum(pRng)
End Function

3. コードを保存し、ウィンドウを閉じます。その後、この数式 =SumColumn(A1)（A1はリスト列の最初のセル）をリスト列の最初のセルに入力し、Enterキーを押すと、ヘッダーを除いたリストが合計されます。

ヒント: リスト内の値を変更した場合、リスト列の合計を更新するには、数式が入力されているセル（今回の例ではセルA1）をダブルクリックしてEnterキーを押す必要があります。

関連記事：

• Excelでヘッダー/最初の行を除いた列全体を選択する