Excelで範囲内の空白セルまたは非空白セルをカウントするにはどうすればよいですか？

Excelの範囲にデータが入力されていないセルがいくつかあり、この範囲にある非空白セルまたは空白セルの数を知りたい場合は、どうすればよいですか？ ここで、Excelの範囲内の空白セルまたは非空白セルをカウントするXNUMXつの方法を紹介します。

数式で空白または非空白のセルを数える
VBで空白または非空白のセルを数える
Kutools forExcelで空白でない細胞を簡単に数える

数式で空白または非空白のセルを数える

Excelには、範囲内の空白または空白以外のセルのみをすばやくカウントするのに役立つ数式があります。

たとえば、以下に示すように、この範囲の空白セルのみをカウントし、空白セルを選択してこの数式を入力する必要があります。 = COUNTIF（A1：G11、 ""） （範囲A1：G11は、空白セルをカウントする範囲を示します。必要に応じて変更できます）。キーボードのEnterボタンを押すと、空白セルがカウントされます。 スクリーンショットを参照してください：

ヒント：次の式を使用できます。 = COUNTBLANK（A1：G11） 空白のセルのみをカウントします。 空白以外のセルのみをカウントする場合は、次の数式を使用できます = COUNTA（A1：G11） （範囲A1：G11は、空白以外のセルをカウントする範囲を示します。必要に応じて変更できます）、またはこの数式を使用することもできます = COUNTIF（A1：G11、 "<>"）.

VBAで空白または非空白のセルをカウントする

次の手順に従って、VBAコードを使用して、空白または空白以外のセルのみをカウントして変換してください。

1。 ホールド 頭の中 ボタンを押して F11 キーボードで開くには アプリケーション用 Microsoft Visual Basic 窓。

2。 クリック インセット > モジュール、VBAをモジュールにコピーします。

VBA：空白のセルのみをカウントします

Sub CountBlanks()
'Updateby20140310
Dim rng As Range
Dim WorkRng As Range
Dim total 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 IsEmpty(rng.Value) Then
        total = total + 1
    End If
Next
MsgBox "There are " & total & " blank cells in this range."
End Sub

3。 クリック ラン VBAを実行するには、 Kutools for Excel 動作範囲を選択するためのダイアログがポップアップ表示されます。スクリーンショットを参照してください。

4。 次に、をクリックします OK ダイアログに表示され、別のダイアログが表示され、この選択された範囲内の空白セルの数が示されます。

ヒント：空白以外のセルをカウントする場合は、上記のようにして、次のVBAを使用できます。

VBA：空白でないセルのみをカウントします

Sub CountNonBlanks()
'Updateby20140310
Dim rng As Range
Dim WorkRng As Range
Dim total 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 IsEmpty(rng.Value) Then
        total = total + 1
    End If
Next
MsgBox "There are " & total & " not blank cells in this range."
End Sub

Kutools forExcelで空白でない細胞を簡単に数える

　 空白でないセルを選択する の有用性 Kutools for Excel ワンクリックで選択した範囲内のすべての非空白セルを選択し、選択したセルの数を簡単に数えるのに役立ちます。

1.カウントする空白以外のセルの範囲を選択し、[ クツール > 選択 > 空白解除セルを選択。 スクリーンショットを参照してください：

2.次に、選択した範囲内の空白でないセルの数を示すダイアログボックスが表示されます。[OK]ボタンをクリックすると、これらの空白でないセルがすぐに選択されます。 スクリーンショットを参照してください：

Kutools forExcelで空白でない細胞を簡単に数える

関連記事：

• Excelの列で重複する値をカウントする
• Excelで結合されたセルをカウントする

最高のオフィス生産性向上ツール

🤖	Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行   |  コードを生成  |  カスタム数式の作成  |  データを分析してグラフを生成する  |  Kutools関数を呼び出す...
	人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
	スーパールックアップ: 複数の基準の VLookup  |   複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
	詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
	列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
	注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー   |  ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化   |  リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
	上位 15 のツールセット:  12 テキスト ツール (テキストを追加, 文字を削除する、...）   |   50+ チャート 種類 (ガントチャート、...）   |   40+ 実用的 式 (誕生日に基づいて年齢を計算する、...）   |   19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...）   |   12 変換 ツール (数字から言葉へ, 通貨の換算、...）   |   7 マージ＆スプリット ツール (高度な結合行, 分割セル、...）   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

続きを読みます... 無料ダウンロード...

---

Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

• Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
• 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
• 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!

続きを読みます... 無料ダウンロード...