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

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

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

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

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

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

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

Kutools for Excel's 文字を削除する ユーティリティを使用すると、Excelの選択したセルからすべての数字、非数字、または指定した文字を簡単に削除できます。
ダウンロードして今すぐ試してみてください！ (30 日間の無料トレイル)

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

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

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

申請する前に Kutools for Excelについては 最初にダウンロードしてインストールします.

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

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

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

このユーティリティの無料トライアル（30日）が必要な場合は、 クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。

Kutools for Excelを使用して、セルからダッシュを簡単に削除できます

最高のオフィス生産性向上ツール

🤖	Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。インテリジェントな実行 \| コードを生成 \| カスタム数式の作成 \| データを分析してグラフを生成する \| Kutools関数を呼び出す...
	人気の機能: 重複を検索、強調表示、または識別する \| 空白行を削除する \| データを失わずに列またはセルを結合する \| 数式なしのラウンド ...
	スーパールックアップ: 複数の基準の VLookup \| 複数の値の VLookup \| 複数のシートにわたる VLookup \| ファジールックアップ ....
	詳細ドロップダウンリスト: ドロップダウンリストを素早く作成する \| 依存関係のドロップダウンリスト \| 複数選択のドロップダウンリスト ....
	列マネージャー: 特定の数の列を追加する \| 列の移動 \| Toggle 非表示列の表示ステータス \| 範囲と列の比較 ...
	注目の機能: グリッドフォーカス \| デザインビュー \| ビッグフォーミュラバー \| ワークブックとシートマネージャー \| リソースライブラリ (自動テキスト) \| 日付ピッカー \| ワークシートを組み合わせる \| セルの暗号化/復号化 \| リストごとにメールを送信する \| スーパーフィルター \| 特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
	上位 15 のツールセット: 12 テキストツール (テキストを追加, 文字を削除する、...） \| 50+ チャート種類 (ガントチャート、...） \| 40+ 実用的式 (誕生日に基づいて年齢を計算する、...） \| 19 挿入ツール (QRコードを挿入, パスから画像を挿入、...） \| 12 変換ツール (数字から言葉へ, 通貨の換算、...） \| 7 マージ＆スプリットツール (高度な結合行, 分割セル、...） \| ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。最も必要な機能を入手するにはここをクリックしてください...

続きを読みます... 無料ダウンロード...

Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作業をはるかに簡単にします

Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
生産性を 50% 向上させ、毎日何百回もマウスクリックを減らすことができます!

続きを読みます... 無料ダウンロード...

Comments (9)

No ratings yet. Be the first to rate!

Angela

about 5 years ago

#25682