メインコンテンツへスキップ

Kutools for Office — 1つのスイート、5つのツールで、もっと多くのことを成し遂げましょう。

COUNTIF関数とLEFT関数を組み合わせて、Excelで特定の文字で始まるセルをカウントする

Author Siluvia Last modified

Excelで大規模なデータセットを扱う場合、指定された範囲内で特定の文字(またはアルファベット/数字)で始まるセルがいくつあるかを把握する必要があることがよくあります。これは、グループ化やセグメント化、またはパターンに従った製品コード、名前、分類項目などのデータを迅速に分析するのに便利です。例えば、常に特定の文字で始まるアイテムや社員名は、適切なExcel関数やツールを使用して効率的にフィルタリングおよびカウントできます。このチュートリアルでは、特定の文字で始まるセルの数をカウントするためのいくつかの実用的な方法を紹介します。これには、従来の数式、専門的なExcelアドイン、そして高度なシナリオ向けのVBAコードが含まれます。各アプローチには独自の利点があり、ニーズやデータ状況に最も合うものを選択できます。

特定の文字で始まるセルをカウントする数式の使用
特定の文字で始まるセルを簡単にカウントできる素晴らしい機能
特定の文字で始まるセルをカウントするためのVBAマクロ


特定の文字で始まるセルをカウントする数式の使用

下記のスクリーンショットに示すように、テキスト文字列リストがあり、「K」という文字で始まるセルの数をカウントする必要があると仮定します。これは、データ検証、リストチェック、または命名規則に従うコードのフィルタリングにおける一般的な作業です。

a screenshot of the original data

これを迅速に行うには、ExcelのCOUNTIF関数とLEFT関数(または配列数式の組み合わせ)を使用したいくつかの異なる数式を使うことができます。これにより、「特定の文字で始まる」という基準を満たすセルのみを識別できます。

1. カウント結果を表示したい空白のセルを選択します。次の数式をそのセルにコピー&ペーストし、Ctrl + Shift + Enterキーを押して結果を得ます(一部のExcelバージョンでは配列数式であるため)。

=COUNT(IF(LEFT(A2:A6,1)="K",1,""))

a screenshot of using formula to count cells begin with a certain character

注意:

  • 1) A2:A6は評価対象となるテキスト文字列を含む範囲です。1は最初の1文字だけを比較することを指定しています。「K」は任意の文字に置き換えることができます。実際のデータに応じて範囲と対象文字を調整できます。
  • 2) 古いExcelバージョンでCtrl + Shift + Enterを使用し忘れた場合、数式が期待通りに計算されないことがあります。Microsoft 365およびExcel 2021では、配列が自動的に展開されることが多いです。
  • 3) 次の数式も、バージョンや好みによって役立つ場合があります:
    =COUNTIF(A2:A6,"K*")
    この数式はワイルドカードを使用しており、範囲A2:A6内で「K」で始まるすべての値に一致します。配列入力は不要です。
    =SUMPRODUCT(--(LEFT(A2:A6,1)="K"))
    この数式は、配列数式の代替案として有用であり、 SUMPRODUCT は配列をネイティブに処理できます。

実践的なヒント: 特定の文字や複数の先頭文字で始まるセルをカウントしたい場合は、LEFT関数の数値(例: LEFT(A2:A6,2)で最初の2文字)と対象文字列を調整してください。ソースデータの先頭に余分なスペースがないことを確認し、正確なカウントを保ちましょう。


特定の文字で始まるセルを簡単にカウントできる素晴らしい機能

Kutools for ExcelSelect Specific Cellsユーティリティは、特定の文字で始まるセルの数をカウントするための簡単で柔軟な方法を提供します。数式を書いたり覚える必要はありません。この視覚的かつクリックベースのアプローチは、複雑な構文を避けたいユーザー、または異なる列や範囲で頻繁にクイックチェックを行う必要があるユーザーに最適です。

Kutools for Excel を適用する前に、まずダウンロードしてインストールしてください

1. チェックしたいセル範囲を選択します。Kutoolsタブに移動し、[Select] > [Select Specific Cells]をクリックします。以下のスクリーンショットをご覧ください。

a screenshot of enabling the Select Specific Cells feature

2. Select Specific Cellsダイアログで設定を行います:

  • 2.1) Selection typeで、個々のセルを確認するためにCellを選択します。
  • 2.2) Specific typeドロップダウンから、Begins withを選んでください。
  • 2.3) テキストボックスに最初の文字(例:「K」)を入力して、検索対象を指定します。
  • 2.4) OKをクリックして操作を実行します。

a screenshot of setting conditions

3. 操作が完了すると、もう一つのSelect Specific Cellsダイアログがポップアップし、指定された範囲内で指定された文字で始まるセルの数を正確に教えてくれます。同時に、一致するすべてのセルがワークシート上で選択されます。OKをクリックしてダイアログを閉じ、結果をさらに確認したり操作したりできます。

この方法は、特に数式を多用しないワークフローで、結果を素早く確認したり、追加の書式設定やアクションのために一致するセルを選択する必要があるユーザーにお勧めです。Kutoolsの機能は大規模なデータセットにもシームレスに対応し、手動での数式管理なしに迅速で繰り返しの操作を可能にします。

注意: この方法は大文字小文字を区別します。一致数が予想と異なる場合は、条件がセルの先頭文字と完全に一致しているか確認してください。

  このユーティリティを無料で試用したい場合(30日間)、こちらをクリックしてダウンロードし、上記の手順に従って操作を適用してください。


特定の文字で始まるセルをカウントするためのVBAマクロ

上級ユーザー向け、または特定の文字で始まるセルの数を動的またはフィルタリングされたデータセット全体でカウントする必要がある自動化シナリオにおいて、VBAは柔軟な代替手段を提供します。シンプルなマクロを使用して、任意の範囲に対してこの操作を実行できます。これは、カウント作業が頻繁に繰り返される場合や、データが頻繁に変更され、毎回数式を更新したくない場合に特に便利です。

以下のマクロは、対象範囲を選択し、確認する文字を入力するよう求められます。その後、各セルを解析し、便利なダイアログにカウント結果を表示します。このソリューションは、繰り返しのタスクを自動化したり、数式を直接使用できないテーブル(フィルタリングされたテーブル、保護されたシート、またはインタラクティブレポートなど)で作業する際に理想的です。このマクロは、修正しない限り大文字小文字を区別しません。

1. Alt + F11キーを押してMicrosoft Visual Basic for Applicationsエディタを開きます。VBAウィンドウで、[Insert] > [Module]をクリックし、次のコードをモジュールウィンドウに貼り付けます。

Sub CountCellsStartingWithChar()
    Dim WorkRng As Range
    Dim Cell As Range
    Dim FirstChar As String
    Dim CountNum As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select the range to count:", xTitleId, WorkRng.Address, Type:=8)
    
    FirstChar = Application.InputBox("Enter the character to check:", xTitleId, "", Type:=2)
    
    CountNum = 0
    
    If WorkRng Is Nothing Or FirstChar = "" Then
        MsgBox "No valid range or character specified.", vbExclamation, xTitleId
        Exit Sub
    End If
    
    For Each Cell In WorkRng
        If Not IsEmpty(Cell.Value) Then
            If Left(Cell.Value, 1) = FirstChar Then
                CountNum = CountNum + 1
            End If
        End If
    Next
    
    MsgBox "Number of cells beginning with '" & FirstChar & "': " & CountNum, vbInformation, xTitleId
End Sub

2. VBAエディタを閉じ、ワークシートに戻ります。Alt + F8を押してマクロの一覧を開きます。CountCellsStartingWithCharを選択し、[Run]をクリックします。指示に従って範囲を選択し、対象の文字を指定します。

実践的なヒント: このマクロは、テキストベースの列やリストに最適です。比較を大文字小文字を区別しないものにしたい場合は、Left(Cell.Value,1) = FirstCharの行をLCase(Left(Cell.Value,1)) = LCase(FirstChar)に置き換えてください。また、選択範囲にはカウント対象のセルのみが含まれていることを確認してください。結合されたセルやエラーを返す数式を持つセルは結果に影響を与える可能性があります。

「有効な範囲または文字が指定されていません」というメッセージが表示された場合、再度試して、プロンプトを空欄にしないように注意してください。このマクロは単純なカウント作業だけでなく、より大きな自動化プロセス(マルチステップレポートやVBA駆動のダッシュボードなど)への統合にも役立ちます。


関連記事

Excelで複数条件でCOUNTIFを使用する
Excelでは、COUNTIF関数を使用してリスト内の特定の値の数を計算することができます。しかし、時には複数の条件でカウントする必要があり、これがより複雑になります。今日は、複数の条件でカウントするためのいくつかのポイントについて説明します。

Excelで日付/月/年と日付範囲によるCOUNTIF
このチュートリアルの方法は、Excelで数式を使用して日付/月/年と日付範囲によるCOUNTIFをガイドします。

Excelで特定のテキストで始まるか終わるセルをカウントする
データの範囲があり、ワークシート内で「kte」で始まるか「kte」で終わるセルの数をカウントしたいとします。ここでは、手動カウントの代わりにいくつかの便利な方法をご紹介します。

複数のワークシート間で特定の値をカウントする
複数のワークシートがあり、これらのワークシートから特定の値「Excel」の出現回数を取得したいとします。複数のワークシートにわたって特定の値をカウントするにはどうすればよいでしょうか?


最高のオフィス業務効率化ツール

🤖 Kutools AI Aide:データ分析を革新します。主な機能:Intelligent Executionコード生成カスタム数式の作成データの分析とグラフの生成Kutools Functionsの呼び出し……
人気の機能重複の検索・ハイライト・重複をマーキング空白行を削除データを失わずに列またはセルを統合丸める……
スーパーLOOKUP複数条件でのVLookup複数値でのVLookup複数シートの検索ファジーマッチ……
高度なドロップダウンリストドロップダウンリストを素早く作成連動ドロップダウンリスト複数選択ドロップダウンリスト……
列マネージャー指定した数の列を追加列の移動非表示列の表示/非表示の切替範囲&列の比較……
注目の機能グリッドフォーカスデザインビュー強化された数式バーワークブック&ワークシートの管理オートテキスト ライブラリ日付ピッカーデータの統合セルの暗号化/復号化リストで電子メールを送信スーパーフィルター特殊フィルタ(太字/斜体/取り消し線などをフィルター)……
トップ15ツールセット12 種類テキストツールテキストの追加特定の文字を削除など)50種類以上のグラフガントチャートなど)40種類以上の便利な数式誕生日に基づいて年齢を計算するなど)19 種類の挿入ツールQRコードの挿入パスから画像の挿入など)12 種類の変換ツール単語に変換する通貨変換など)7種の統合&分割ツール高度な行のマージセルの分割など)… その他多数
Kutoolsはお好みの言語で利用可能 ― 英語、スペイン語、ドイツ語、フランス語、中国語、その他40以上の言語に対応!

Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体感しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と保存時間を実現します。最も必要な機能はこちらをクリック...


Office TabでOfficeにタブインターフェースを追加し、作業をもっと簡単に

  • Word、Excel、PowerPointでタブによる編集・閲覧を実現
  • 新しいウィンドウを開かず、同じウィンドウの新しいタブで複数のドキュメントを開いたり作成できます。
  • 生産性が50%向上し、毎日のマウスクリック数を何百回も削減!

全てのKutoolsアドインを一つのインストーラーで

Kutools for Officeスイートは、Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proをまとめて提供。Officeアプリを横断して働くチームに最適です。

Excel Word Outlook Tabs PowerPoint
  • オールインワンスイート — Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proが含まれます
  • 1つのインストーラー・1つのライセンス —— 数分でセットアップ完了(MSI対応)
  • 一括管理でより効率的 —— Officeアプリ間で快適な生産性を発揮
  • 30日間フル機能お試し —— 登録やクレジットカード不要
  • コストパフォーマンス最適 —— 個別購入よりお得