Excelのセルからダッシュをすばやく削除するにはどうすればよいですか？

ワークシートのセルに郵便番号または長いISBN番号のリストがあり、長い番号にダッシュが含まれているとすると、何らかの目的で、番号の間のダッシュを削除する必要があります（次のスクリーンショットを参照）。 Excelの数字の間のこれらのダッシュを削除する簡単な方法はありますか？

数式でセルからダッシュを削除する
Kutools for Excelを使用して、セルからダッシュを簡単に削除できます
VBAコードでセルからダッシュを削除する

数式でセルからダッシュを削除する

これに 代替 関数では、数値はテキスト値に変換されるため、ダッシュを削除しても、先頭の0は削除されず、数値は科学的記数法になりません。 次のようにしてください。

1。 隣接する空白のセル（たとえばC1）に、次の数式を入力します。 = SUBSTITUTE（A1、 "-"、 ""）、スクリーンショットを参照してください：

2。 押す 入力します キーを押してセルC1を選択し、塗りつぶしハンドルをこの数式を含める範囲にドラッグします。 そして、数字の間のダッシュは削除されました。 スクリーンショットを参照してください：

Kutools forExcelでセルからダッシュを削除する

Excelの初心者の場合、数式とコードの両方が難しいので、心配しないでください。 Kutools for Excelさん 文字を削除する 関数は、セルからダッシュをすばやく削除するのに役立ちます。

1。 ダッシュを削除する必要のあるセルの範囲を選択し、[ クツール > テキスト > 文字を削除する、スクリーンショットを参照してください：

2。 の中に 文字を削除する ダイアログボックス、チェック カスタム オプションを入力し、「-」文字をテキストボックスに入力すると、からの結果をプレビューできます。 プレビュー ペイン。 次に、をクリックします OK ボタンをクリックして、選択したセルのすべてのダッシュを削除します。 スクリーンショットを参照してください：

Note。 選択したセルに先行ゼロまたは多数の数字が含まれている場合、先行ゼロを保持し、ダッシュを削除した後に数値が科学的記数法になるのを避けるために、適用する前に、以下のスクリーンショットのようにセルをテキストとしてフォーマットする必要があります。 文字を削除する ユーティリティ。

VBAコードでセルからダッシュを削除する

次のVBAコードを使用して、セルの範囲から数字の間のダッシュを削除することもできます。

1。 ダッシュを削除する範囲を強調表示します。

2。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

3に設定します。 OK をクリックします。 インセット > モジュール、モジュールウィンドウに次のコードを貼り付けます。

VBA：数字の間のダッシュを削除します

Sub DeleteDashes()
'Update 20130907
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each rng In WorkRng
    rng.NumberFormat = "@"
    rng.Value = VBA.Replace(rng.Value, "-", "")
Next
Application.ScreenUpdating = True
End Sub

4。 次に、 F5 このコードを実行するにはキーを押すと、使用する範囲を選択するように指示するダイアログが表示されます。 スクリーンショットを参照してください：

5。 そして、 OK、数字の間のダッシュはセルから削除されました。 そして、数値形式はテキスト形式に変換されます。 スクリーンショットを参照してください：

関連記事：

• セルから英字を削除する
• セルから数字以外の文字を削除する
• セルから数字を削除する
• 印刷できない文字をセルから削除する
• セルから非英字を削除する
• 改行をすばやく削除する
• 英数字以外の文字を削除する