Excelでセルがxまたはyと等しい場合に迅速にカウントするにはどうすればよいですか？

ある範囲のデータがあると仮定し、その中で「りんご」または「マンゴー」と等しいセルを数えたい場合、一つずつ手動で数えることなく、どのようにして素早くカウントできますか？
数式を使用して、基準xまたはyに等しいセルの数をカウントする
ユーザー定義関数を使用して、基準xまたはyに等しいセルの数をカウントする
Kutools for Excelを使用して、基準xまたはyに等しいセルの数をカウントする

数式を使用して、基準xまたはyに等しいセルの数をカウントする

ここでは、xまたはyに等しいセルの数をカウントするのに役立ついくつかの数式を紹介します。

xまたはyに等しいセルをカウントする

空白のセルを選択し、例えばE2を選んで、この数式を入力します： =COUNTIF(A2:B7,"Apple")+COUNTIF(A2:B7,"Mango") そして、 Enter キーを押して結果を得ます。

上記の数式では、A2:B7はカウントしたい範囲であり、「Apple」と「Mango」はカウントしたい値です。必要に応じて変更できます。

範囲内にxまたはyを含む行をカウントする

空白のセルを選択し、例えばE2を選んで、この数式を入力します： =SUM(IF((A2:A7="Apple")+(B2:B7="Mango"),1,0))、そして Shift + Ctrl + Enter キーを押して正しい結果を得ます。

ユーザー定義関数を使用して、基準xまたはyに等しいセルの数をカウントする

ユーザー定義関数を使用すると、基準xまたはyに等しいセルの数もカウントできます。

1. Alt + F11キーを押して Microsoft Visual Basic for Applicationsウィンドウを開きます。

2. 「挿入」>「モジュール」をクリックし、コードをスクリプトに貼り付けます。

コード: どちらかをカウント

Function FindTwoStrings(Rng As Range, Str1 As String, Optional Str2 As String = "") As Long
    'UpdatebyExtendoffice20160705
    Application.Volatile
    Dim xCell As Range
    For Each xCell In Rng
        If (InStr(1, UCase(xCell.Value), UCase(Str1), 1) > 0) Or _
           (InStr(1, UCase(xCell.Value), UCase(Str2), 1) > 0) Then _
          FindTwoStrings = FindTwoStrings + 1
    Next
End Function

3. コードを保存し、戻って結果をカウントしたい空白のセルを選択し、この数式を入力します： =FindTwoStrings(A2:A7,D3,D4) Enterキーを押してカウント結果を得ます。

ヒント: この数式では、A2:A7はカウントしたい範囲であり、D3とD4はカウントしたい文字列です。

Kutools for Excelを使用して、基準xまたはyに等しいセルの数をカウントする

セルがxまたはyに等しい数をカウントし、それらを特定したい場合は、 Kutools for Excelの「特定のセルを選択」機能を適用できます。

無料でインストールした 後、以下のように操作してください：

1. カウントしたいセルのデータ範囲を選択し、次に Kutools > 選択 > 特定のセルを選択をクリックします。スクリーンショットをご覧ください：

2. 特定のセルを選択 ダイアログで、必要なオプションを 選択タイプ セクションでチェックし、両方のドロップダウンリストから 等しい を選択し、それぞれの条件を2つのテキストボックスに入力し、「Or」オプションをチェックすることを忘れないでください。スクリーンショットをご覧ください： Or オプション。スクリーンショットをご覧ください：

3. OK または 適用をクリックすると、条件に一致するセルの数を知らせるダイアログが表示され、同時に、条件1または条件2に一致するセルが選択されます。