Excel で電話番号から市外局番を抽出するにはどうすればよいですか？

著者Sun変更日2025-10-11

Excel ワークシートに顧客の電話番号リストがあり、地理的な地域に基づいて顧客を分析・グループ化したい場合は、完全な電話番号から市外局番を分離することが不可欠です。これは、マーケティング、物流、地域別レポートなど、市外局番に基づいてデータをフィルターや並べ替え、集計する必要があるタスクで特に役立ちます。Excel には市外局番を抽出するためのいくつかの効果的な方法があり、最適な方法はデータセットの構造や個人の好みによって異なります。以下では、Excel で電話番号から市外局番を分離する3 つの実用的な方法を紹介します。それぞれに独自の利点と適用可能なシナリオがあります。

Excel で数式を使って電話番号から市外局番を分離する

列の区切り文字機能で電話番号から市外局番を分離する

VBA コード – 電話番号から自動的に市外局番を抽出する

Excel で数式を使って電話番号から市外局番を分離する

素晴らしい！Excel でChrome、Edge、Firefox、Safari のような効率的な Tabs をご利用いただけます！
毎日数千回のマウスクリックを削減し、50% もの時間を節約できます！

この方法は、電話番号が常に同じパターン（例：北米の標準形式で市外局番が常に最初の3 桁）に従っている場合に最適です。数式を使った処理は素早く簡単に適用でき、小規模から中規模のリストにぴったりです。

通常、市外局番は電話番号文字列の先頭3 文字で表されます（ダッシュや括弧の有無に関わらず）。各電話番号が市外局番で始まる基本的なケースでは、次の数式をご利用いただけます。

1。電話番号が B1 にある場合、市外局番を抽出して表示したいセル（例：C1）を選択し、次の数式を入力してください。

=MID(B1,1,3)

2。Enterキーを押して確定すると、市外局番が表示されます。リスト全体に素早く適用するには、セルの右下隅にあるフィルハンドルを下方向にドラッグし、すべての該当する電話番号に適用してください。

数式で市外局番を電話番号から分離

注：電話番号にスペース、ダッシュ、括弧などの書式（例：「(123)456-7890」や「123-456-7890」）が含まれている場合、これらの書式に対応するよう数式を調整する必要があります。括弧付きの電話番号向けの数式例を以下に示します。

=MID(B1,2,3)

開始位置と長さはデータの形式に合わせて調整できます。必ずいくつかのサンプルを確認し、数式が意図した市外局番のみを正しく返すことをご確認ください。データセット内に複数の書式が混在している場合は、追加のロジックやクリーンアップが必要となる場合があります。

数式で期待通りの市外局番が抽出されない場合は、電話番号の元の形式を確認し、それに応じて数式を調整してください。たとえば、より複雑なデータパターンにはLEFT()、RIGHT()、またはSEARCH()などの関数を活用できます。

Excel で列の区切り文字機能を使って電話番号から市外局番を分離する

この方法は、電話番号の桁数が一定である場合や、市外局番とそれ以降の番号が常に同じ位置にある場合に有効です。「列の区切り文字」ツールは、データを固定幅で分割するか、指定した区切り文字を使って分割します。中規模のデータセットには便利ですが、電話番号の書式が大きく異なる場合や大規模なデータクリーニングにはおすすめできません。

1。電話番号のリストが含まれる列を選択します。上部のリボンで、データ > 列の区切り文字をクリックしてください。スクリーンショットをご参照ください。

「文字列を列に分割」機能で市外局番を電話番号から分離

2。テキストを列に分けるウィザードで、固定幅を選択し、次へをクリックします。このオプションは、市外局番が常に番号の先頭にあり、かつ同じ桁数の場合に最適です。スクリーンショットをご確認ください。

「文字列を列に分割」機能ウィザード1

3。次の画面で、市外局番の後に区切り線を配置してフィールド幅を設定してください（3 桁の市外局番の場合は、3 文字目の直後にクリックします）。必要に応じて、データの形式に合わせて区切り線を調整または移動してください。スクリーンショットをご参照ください。

「文字列を列に分割」機能ウィザード2

電話番号にさまざまな書式や長さが混在する場合は、「区切り文字」オプションを使って、スペースやダッシュ、括弧などの特定の区切り文字を指定することをおすすめします。

4。完了をクリックすると、列が分割されて市外局番が新しい列に分離されるため、市外局番ごとの分析やグループ化が簡単にできます。

「文字列を列に分割」機能で市外局番を電話番号から分離し、結果を取得

ヒント：確定する前に、必ずウィザード内のプレビューを確認してください。データが正しく表示されない場合は、戻って区切り文字や区切り線の設定を調整してください。「列の区切り文字」機能は隣接列のデータを上書きしてしまうため、使用前にシートのバックアップを保存することを強くおすすめします。

VBA コード – 電話番号から自動的に市外局番を抽出する

大規模なデータセットや不規則な電話番号の書式が混在するリストでは、シンプルな VBA マクロを作成することで、市外局番を効率的かつスケーラブルに抽出できます。このアプローチは、市外局番が括弧やダッシュ、スペースなどの非標準的な文字付きまたはなしで表記されている場合に特に有効です。VBA を使えばカスタマイズ性の高い抽出ロジックを実装でき、数式ベースの方法よりも例外処理をより柔軟に行えます。

1。Excel のリボンで開発タブをクリックし、Visual Basicを選択して VBA エディターを開きます。Microsoft Visual Basic for Applicationsウィンドウが表示されたら、挿入＞標準モジュールをクリックし、以下のコードをモジュールにコピー＆ペーストしてください。

Sub ExtractAreaCodes()
    Dim cell As Range
    Dim phoneStr As String
    Dim areaCode As String
    Dim regEx As Object
    Set regEx = CreateObject("VBScript.RegExp")
    
    regEx.Pattern = "\(?(\d{3})\)?[-\s.]?"
    regEx.Global = False
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set phoneRange = Application.InputBox("Select phone number range", xTitleId, "", Type:=8)
    
    For Each cell In phoneRange
        phoneStr = cell.Value
        If regEx.Test(phoneStr) Then
            areaCode = regEx.Execute(phoneStr)(0).SubMatches(0)
            cell.Offset(0, 1).Value = areaCode
        Else
            cell.Offset(0, 1).Value = ""
        End If
    Next cell
    
    Set regEx = Nothing
End Sub

2。VBA エディターでマクロを実行するには、をクリックして実行

ヒント：このコードは、市外局番の直後に括弧、ダッシュ、スペース、ピリオドが含まれる電話番号にも、それらが省略された電話番号にも対応します。さらに複雑な書式がある場合は、コード内の正規表現を調整することで対応可能です。出力を必ず確認し、市外局番が欠落している番号や特殊なパターンなど、抽出に失敗したケースを修正してください。

Excel で正の数と負の数を分離する

最高の Office 業務効率化ツール

🤖	KUTOOLS AI アシスタント：次に基づいてデータ分析を革新します：インテリジェント実行｜コード生成｜カスタム数式作成｜データ分析とチャート生成｜拡張機能呼び出し…
	人気の機能：検索・ハイライト、または重複をマーキング｜空白行を削除する｜データを失うことなく列の結合またはセルを｜数式を使用しない四捨五入...
	スーパー LOOKUP：複数条件 VLookup ｜複数値 VLookup ｜複数シート間 VLookup ｜ファジーマッチ....
	高度なドロップダウンリスト：ドロップダウンリストをすばやく作成｜連動型ドロップダウンリスト｜複数選択可能なドロップダウンリスト....
	列マネージャー：指定した数の列を追加｜列の移動｜非表示列の表示状態を切り替え｜範囲および列の比較...
	注目の機能：グリッドフォーカス｜デザインビュー｜強化された数式バー｜ワークブックとシートマネージャー｜リソースライブラリ（オートテキスト）｜日付ピッカー｜ワークシートの統合｜暗号化／セルの復号化｜リストからメール送信｜スーパーフィルター｜特殊フィルタ（太字のフォントを持つセルをフィルタリング／斜体／取り消し線。。。）。。。
	トップ15 ツールセット：12 テキストツール（テキストの追加、特定の文字を削除、...）｜ 50+チャートタイプ（ガントチャート、...）｜ 40+実用的関数（誕生日に基づいて年齢を計算します、...）｜ 19 挿入ツール（QR コードを挿入、パスから画像を挿入、...）｜ 12 変換ツール（単語に変換する、為替レートの変換、...）｜ 7 結合と分割ツール（高度な行のマージ、セルの分割、...）｜さらに多数

Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています！

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。

Kutools for Excel の詳細はこちら。。。無料ダウンロード。。。

Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
日々の生産性を50％も向上させ、毎日数百回ものマウスクリックを削減します！