如何從 Excel 儲存格中移除所有非數字字元？

Excel 使用者經常會遇到包含數字與非數字字元（例如字母或符號）混合的資料。為確保後續分析與報表製作順暢無礙，徹底清理這類資料至關重要。本指南將為您介紹四種高效方法，輕鬆從 Excel 儲存格中移除非數字字元，讓您的資料乾淨整齊、隨時可用。

• 使用公式（Excel 2021 及更新版本）
• 使用 KUTOOLS AI 助手（智慧且高效）
• 使用強大工具（一鍵操作）
• 使用 VBA 程式碼

在 Excel 中從儲存格移除非數字字元

本節將介紹四種高效方法，協助您輕鬆從 Excel 儲存格中移除非數字字元，並針對不同 Excel 版本與使用者熟練度量身打造。

使用公式從 Excel 儲存格中移除非數字字元

若要從 Excel 儲存格中移除非數字字元，您可以使用以 TEXTJOIN 函數為基礎的公式。

步驟 1：選取一個儲存格並套用公式

在 C2 儲存格中輸入下列公式，然後按下 Enter 鍵即可取得結果。

=TEXTJOIN("",TRUE,IFERROR(MID(A2,SEQUENCE(LEN(A2)),1)+0,""))+0

步驟 2：將公式套用至其他儲存格並取得所有結果

計算出初始結果後，請從公式儲存格（本例為 C2）向下拖曳填滿控點，將公式套用至其他儲存格，一路延伸至 C8.

使用 KUTOOLS AI Aide 從 Excel 儲存格中移除非數字字元

Kutools for Excel 的「AI 助手」功能在清理 Excel 工作表時帶來無與倫比的便利，輕鬆一鍵移除非數字字元。只需輸入簡單指令，這款強大工具便能自動分析並執行所需任務，完全無需複雜公式。不僅大幅加速處理流程，更有效避免人為錯誤，顯著提升工作效率與準確性。「AI 助手」將繁瑣的手動作業轉化為流暢高效的自動化流程，是每位追求工作流程優化的 Excel 使用者不可或缺的利器。

下載並安裝 Kutools for Excel 後，點選「KUTOOLS AI」＞「AI 助手」以開啟「KUTOOLS AI Aide」窗格。

1. 在「KUTOOLS AI Aid」窗格中，將下方文字輸入聊天框，然後點選「傳送」按鈕，或按下 ENTER 鍵提交您的查詢。

「請幫我從 Excel 的 A2:A8 範圍中移除非數字字元。」

2. 工具分析完您的輸入後，點選「Execute」按鈕，KUTOOLS AI Aide 將運用其 AI 技術處理您的請求，並將結果直接套用至 Excel。

提示：若要使用此功能，您需先安裝 Kutools for Excel，請 點此下載 Kutools for Excel立即體驗！

使用超強工具從 Excel 儲存格中移除非數字字元

若要高效清理指定範圍內的資料並移除非數字字元，Kutools for Excel 的「刪除特定字元」功能提供一鍵式解決方案。這款強大工具大幅簡化原本繁瑣的流程，讓您快速清除資料中的不必要字元，立即獲得更乾淨、更實用的結果。

1. 選取欲移除非數字字元的範圍後，點選「Kutools」＞「文字」＞「刪除特定字元」。

2. 在「刪除特定字符」對話方塊中，勾選「非數字」選項，然後點選「確定」，即可立即將所選範圍內的非數字字元移除。

提示：若要使用此功能，您需先安裝 Kutools for Excel，請 點此下載 Kutools for Excel，立即體驗！

使用 VBA 程式碼從 Excel 儲存格中移除非數字字元

若要使用 VBA 程式碼從範圍中移除非數字字元，請依照下列步驟操作：

步驟 1：開啟 VBA 模組編輯器並複製程式碼

1. 在 Excel 中按下「Alt + F11」，即可開啟「Microsoft Visual Basic for Applications」視窗。
2. 按一下「插入」>「模組」，然後將下列程式碼複製並貼上至模組視窗中。
3. VBA 程式碼：移除所有非數字字元

   Sub RemoveNotNum()
   'Updateby Extendoffice
   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)
   For Each Rng In WorkRng
       xOut = ""
       For i = 1 To Len(Rng.Value)
           xTemp = Mid(Rng.Value, i, 1)
           If xTemp Like "[0-9]" Then
               xStr = xTemp
           Else
               xStr = ""
           End If
           xOut = xOut & xStr
       Next i
       Rng.Value = xOut
   Next
   End Sub
   

步驟 2：執行程式碼

1. 貼上此程式碼後，請按下 F5 鍵來執行。
2. 在彈出的 Kutools for Excel 對話方塊中，選取您要移除非數字字元的範圍，然後點擊「確定」。

結果

接著，所有非數字字元的選擇區域都已移除。

相關文章