Excelで電話番号の形式を数字に変換するにはどうすればよいですか?
電話番号のリストが含まれているExcelワークシートを扱う際、括弧、スペース、またはダッシュなど、さまざまな書式スタイルが使用されていることがあります。これらの非数字文字は、データ分析、システムインポート、または自動ダイヤルプロセスに干渉することがあります。純粋な数字列で電話番号が必要になる場合、この記事ではExcelで効率的にこれを行うためのいくつかの実用的な解決策を提供します。
左側の列には異なる形式の電話番号があり、右側の列にはすべての非数字文字を取り除いた結果が表示されています。理想的な結果としては、継続した数値のみが残ります。
数式を使用して電話番号の形式を数字に変換する
フラッシュフィルを使用してフォーマットされた電話番号から数字を抽出する
Kutools for Excelを使用して電話番号の形式を数字に変換する
マクロを使用して電話番号からすべての非数字文字を削除する
数式を使用して電話番号の形式を数字に変換する
Excelの数式を使用すると、不要な文字を削除し、電話番号リストに数字のみを保持できます。この方法は、アドインやプログラミングを使用しないことを好む場合に特に役立ち、(123)456-7890や123-456-7890などの一貫した形式の電話番号に対してうまく機能します。ただし、データに追加の非標準の記号や文字が含まれる場合、より高度な技術が必要になることがあります。
1. 抽出した数字を表示したい空白セル(例えばC2)を選択し、次の数式を入力してEnterキーを押します:
=--SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,"(",""),")","")," ",""),"-","")
注意: この数式ではA2は元の電話番号が含まれているセルを参照しています。データが別の列や行にある場合は、この参照を変更できます。
2. C2セルを選択したまま、フィルハンドル(セルの右下隅にある小さな四角)をドラッグして、リストの残りの部分(例えばC2からC8まで)に数式を適用します。これにより、範囲内の各電話番号に数式が適用されます。
これで、データ範囲内の各電話番号が数字の連続した列に変換されるはずです。
フラッシュフィルを使用してフォーマットされた電話番号から数字を抽出する
Excelのフラッシュフィル機能は、スマートで手動による代替手段であり、特に一貫したリスト形式を扱う場合や、数式を使わない迅速なアプローチを求めている場合に有効です。フラッシュフィルは手動での入力を基にパターンを評価し、その例に基づいて列の残りの部分を埋めます。
1. 電話番号が列Aにあり、セルA2から始まると仮定します。隣接する列(B2)で、最初の電話番号から数字のみを手動で入力し、すべての記号やスペースを省略します(例: 1234567890)。
2. セルB3に移動し、次の電話番号の数字を入力し始めます。そうすると、Excelが自動的にパターンを検出し、入力された値の下にグレーでハイライトされた推奨オートフィルを表示します。
3. Enterキーを押してフラッシュフィルの提案を受け入れると、Excelは列全体に対応する行の数字を抽出して埋めます。
ヒント: フラッシュフィルが自動的にトリガーされない場合、完成したセルを選択してショートカットCtrl + Eを使用するか、リボンから「データ」>「フラッシュフィル」をクリックすることで手動でアクティブ化できます。
注意: 埋められた結果の正確性を確認してください。特に電話番号の形式が異なる場合、フラッシュフィルは予測不可能な間隔、混合書式、または埋め込まれたテキストを持つリストに対してうまく動作しないことがあります。
まとめ: フラッシュフィルは一回限りまたは小規模なデータセットに対して迅速な方法ですが、元のデータが変更された場合、動的に更新されません。常に更新されるリストの場合、数式やVBAメソッドを考慮してください。
Kutools for Excelを使用して電話番号の形式を数字に変換する
より便利でインタラクティブなソリューションを探しているユーザーにとって、Kutools for ExcelのRemove Charactersユーティリティは、選択したセルから指定された記号(ダッシュ、スペース、括弧など)を効率的に削除できます。このアプローチは、頻繁に構造化データを処理し、数式やコードを書かずに電話番号をクリーンアップしたい場合に最適です。
1. 数字に変換したい電話番号の範囲を選択し、Kutools>テキスト>Remove Charactersに移動します。
2. Remove Charactersダイアログボックスで、カスタムオプションを選択し、テキストボックスにハイフン –を入力します。スペース、括弧、ピリオドなど、削除したい他の文字もボックスに入力できます。設定後、OKをクリックして範囲を処理します。
選択した電話番号は即座に更新され、指定された文字が削除され、以下のようにクリーンな数字列になります。
このユーティリティを無料で試用したい場合(30日間)、こちらをクリックしてダウンロードし、上記の手順に従って操作を適用してください。
マクロを使用して電話番号からすべての非数字文字を削除する
タスクに多数の電話番号が含まれ、形式が混在していたり予測不可能な場合(特殊文字、スペース、余分な句読点、テキスト、さらには国コードを含む場合)、ExcelのVBAマクロは非常に柔軟で自動的にこれらのエントリーを一度にクリーンにする方法を提供します。このアプローチは、大規模なデータセットや繰り返しのクリーニング作業に特に役立ちます。
適用場面: 電話番号の形式が不規則で、多くの行を処理する必要がある場合、または数式や組み込み機能がニーズを完全に満たさない場合、VBAを使用してください。ただし、マクロを使用するにはブックをマクロ有効形式(*.xlsm)で保存し、マクロの許可を与える必要があります。
ステップ:
1. Alt + F11を押してVisual Basic for Applicationsエディターを開きます。新しいウィンドウで、挿入>モジュールをクリックして空のモジュールを作成し、次のVBAコードをコードウィンドウにコピーして貼り付けます。
Sub StripNonDigitsFromPhoneNumbers()
Dim xRg As Range
Dim xCell As Range
Dim xDigits As String
Dim i As Integer
Dim xTitleId As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set xRg = Application.Selection
Set xRg = Application.InputBox("Select the range with phone numbers", xTitleId, xRg.Address, Type:=8)
For Each xCell In xRg
xDigits = ""
For i = 1 To Len(xCell.Value)
If Mid(xCell.Value, i, 1) Like "#" Then
xDigits = xDigits & Mid(xCell.Value, i, 1)
End If
Next i
xCell.Value = xDigits
Next xCell
End Sub
2. そして 実行 ボタンをクリック(または F5を押す)。表示されるダイアログで、データ範囲を確認または選択します。マクロは選択範囲内の各セルからすべての非数字文字を自動的に除去し、純粋な数字列のみを残します。
パラメータ説明: このマクロは各セルの各文字を処理し、結果として数字のみを追加します。実行前にすべての希望する列/行をカバーするように選択範囲を調整してください。
ヒント&エラーの注意: VBAスクリプトを初めて実行する前には必ずブックを保存してください。変更は1クリックで元に戻せません。マクロのセキュリティ警告が出た場合、コードのソースを確認し、必要に応じてマクロを有効にしてください。共同環境では重要なデータを上書きしないように注意してください。
まとめ: マクロを実行した後、クリーンなデータを素早く確認して正確性を確保してください。国コードや内線が必要な場合、これらは数字列に連結されることに注意してください。必要な場合はこれらの要素を個別に処理してください。
関連記事:
最高のオフィス生産性ツール
🤖 | Kutools AI アシスタント: データ分析を革命化する: インテリジェント実行 | コード生成 | カスタム数式の作成 | データを分析しグラフを生成 | 拡張機能を呼び出す… |
人気の機能: 重複を見つけてハイライトまたはマーキング | 空白行を削除 | データを失わずに列またはセルを統合 | 丸める ... | |
スーパーLOOKUP: 複数条件のVLookup | 複数値のVLookup | 複数シートの検索 | ファジーマッチ .... | |
高度なドロップダウンリスト: ドロップダウンリストを迅速に作成 | 依存ドロップダウンリスト | マルチセレクトドロップダウンリスト .... | |
列管理: 特定の数の列を追加 | 列を移動 | 非表示列の可視ステータスを切り替え | 範囲と列を比較 ... | |
注目の機能: グリッドフォーカス | デザインビュー | 強化された数式バー | ワークブック & ワークシート管理 | オートテキスト ライブラリ (Auto Text) | 日付ピッカー | データの統合 | セルの暗号化/復号化 | リストで電子メールを送信 | スーパーフィルター | 特殊フィルタ (太字/斜体/取り消し線をフィルタリング...) ... | |
トップ15のツールセット: 12 のテキストツール (テキストの追加, 特定の文字を削除, ...) | 50以上 のグラフ の種類 (ガントチャート, ...) | 40以上の実用的な 数式 (誕生日に基づいて年齢を計算する, ...) | 19 の挿入ツール (QRコードの挿入, パスから画像を挿入, ...) | 12 の変換ツール (単語に変換する, 通貨変換, ...) | 7 の統合 & セルの分割ツール (高度な行のマージ, セルの分割, ...) | ...さらに多く |
Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、300以上の高度な機能を提供し、生産性を向上させ、保存時間を節約します。 最も必要な機能を入手するにはここをクリック...
Office TabはOfficeにタブインターフェイスをもたらし、作業を非常に簡単にします
- Word、Excel、PowerPoint、Publisher、Access、Visio、Projectでタブ付きの編集と読み取りを有効にします。
- 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
- 生産性を50%向上させ、毎日数百回のマウスクリックを減らします!