Excelのエラーを無視してセルの範囲を合計するにはどうすればよいですか？

ワークシートにエラー値が含まれている場合がありますが、エラー値を無視して、選択したセル範囲を合計したいとします。 範囲にSum関数を直接適用すると、間違った結果が得られます。 ここでは、簡単で効果的な方法をいくつか紹介します。

配列数式のエラーを無視してセルの範囲を合計する

VBAコードのエラーを無視してセルの範囲を合計する

配列数式のエラーを無視してセルの範囲を合計する

次のスクリーンショットに示すようにセル値の範囲があるとすると、この配列数式を適用して、エラーを無視して範囲を合計できます。 このようにしてください：

1。 空白のセルに、この数式を入力します = SUM（IF（ISERROR（A1：C6）、 ""、A1：C6））、スクリーンショットを参照してください：

Note：上記の式では、 A1：C6 合計したい範囲です。必要に応じて変更できます。

2。 次に、 Ctrl + Shift + Enter 同時にキーを押して終了します。 そして、次の結果が得られます。

VBAコードのエラーを無視してセルの範囲を合計する

次のVBAコードは、エラーのあるセル値の合計をすばやく取得するのにも役立ちます。

1。 を押し続けます Alt + F11 キー、そしてそれは開きます Microsoft Visual Basic forApplicationsウィンドウ.

2に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュールウィンドウ.

VBAコード：エラーを無視したセルの範囲の合計

Sub SumNumNoError()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim xSum As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    If Not (IsError(Rng.Value)) Then
        xSum = xSum + Rng.Value
    End If
Next
MsgBox xSum
End Sub

3. 次に、 F5 キーを押してコードを実行すると、合計する範囲を選択するように促すプロンプトボックスが表示されます。

4. そして、 OK、次のように結果を表示するプロンプトボックスが表示されます。

関連記事：

Excelのリストで最大または最小の3つの値を合計するにはどうすればよいですか？

ExcelでXNUMX行おきまたはn番目の行/列をすばやく合計するにはどうすればよいですか？

Excelでフィルター処理されたセルまたは表示されているセルのみを合計するにはどうすればよいですか？