跳到主要內容

探索新、 免費版 今天的 Outlook 的 Kutools ！

 

如何從Excel儲存格中刪除非數字字元？

新增一名作者 最後修改時間：2024-06-18

Excel 使用者經常會遇到包含數字和非數字字元（例如字母或符號）混合的資料。清理這些數據對於進一步分析或報告至關重要。在本指南中，我們將探討四種從 Excel 儲存格中刪除非數字字元的方法，確保您的資料乾淨且可用。

從 Excel 儲存格中刪除非數字字符

在本節中，我們將介紹四種從 Excel 儲存格中刪除非數字字元的有效方法，這些方法針對不同的 Excel 版本和使用者專業程度而量身定制。

使用公式從 Excel 儲存格中刪除非數字字符

若要從 Excel 儲存格中刪除非數字字符，您可以使用基於下列公式的公式： 文字加入 的功能。

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

在單元格中 C2，應用下面的公式，然後按 Enter 獲得結果的關鍵。

=TEXTJOIN("",TRUE,IFERROR(MID(A2,SEQUENCE(LEN(A2)),1)+0,""))+0
文字加入 此函數在 Excel 2019 及更高版本中可用。還有 序列 此函數在 Excel 2021 及更高版本中可用。如果您想要在所有 Excel 版本中以更簡單的方式實現目標，請參閱 透過使用 Kutools AI Aide 方法或 透過使用一個神奇的工具 方法我們接下來會介紹。
步驟 2：將公式套用到其他儲存格並獲得所有結果

計算初始結果後，從公式單元格中拖曳填充手柄（C2 在此範例中）向下將公式應用於其他單元格，將其擴展到單元格 C8.

公式解釋：
  1. LEN（A2）：求A2中字串的長度。
  2. 序列(LEN(A2))：建立從 1 到字串長度的數字列表。每個數字對應於字串中的一個字元位置。
  3. 中（A2，序列（LEN（A2）），1）：一次提取 A2 中的每個字元。
  4. +0：嘗試將每個字元轉換為數字。如果字元不是數字，則會導致錯誤。
  5. IFERROR(..., "")：如果轉換字元導致錯誤（意味著它不是數字），則會將其替換為空字串。
  6. TEXTJOIN("", TRUE, ...)：將所有字元組合回單一字串，跳過任何空字串（已刪除的非數字）。
  7. 最後+0：將最終的數字字串轉換回數值。

使用 Kutools AI Aide 從 Excel 儲存格中刪除非數字字符

Excel的Kutools's 人工智慧助手 透過輕鬆刪除非數字字符，該功能為清理 Excel 工作表提供了無與倫比的便利性。只需您進行簡單的輸入，這個強大的工具就會接管，自動分析和執行所需的任務，而無需複雜的公式。這不僅加快了流程，還消除了潛在的錯誤，並顯著提高了您的生產力和準確性。這 人工智慧助手 將繁瑣的手動任務轉變為無縫、高效的操作，使其成為任何旨在優化工作流程的 Excel 使用者的重要資產。

後 下載並安裝 Kutools for Excel點擊此處成為Trail Hunter Kutools人工智慧 > 人工智慧助手 打開 Kutools 人工智慧助手 窗格。

1。 在裡面 Kutools 人工智慧援助 窗格中，在聊天框中輸入您的要求（如下面的文字所示），然後按一下 送出 按鈕或按下 Enter 鍵提交您的查詢。

"請幫我刪除 Excel 中 A2:A8 範圍內的非數字字符."

2. 該工具分析完您的輸入後，按一下 執行 按鈕。 Kutools AI Aide 將利用其人工智慧技術來處理您的請求並將結果直接應用在 Excel 中。

尖端：要使用此功能，您應該安裝 Excel的Kutools 首先，請 點擊下載並獲得 30 天免費試用 。

使用神奇的工具從 Excel 儲存格中刪除非數字字符

為了透過刪除指定範圍內的非數字字元來有效清理數據， Excel的Kutools“ 刪除字符 實用程式提供了一個 一鍵式 解決方案。這個強大的工具簡化了通常繁瑣的過程，使您能夠快速消除資料中不需要的字符，確保立即獲得更乾淨、更可用的結果。

注意： 要應用此 刪除字符 功能，首先，您應該下載並安裝 Excel的Kutools.

1. 選擇要刪除非數字字元的範圍後，按一下 庫工具 > 文本 > 刪除字符.

2。 在裡面 刪除字符 對話框，檢查 非數值 選項，然後單擊 OK。然後，非數字字元將立即從選擇中刪除。

尖端：要使用此功能，您應該安裝 Excel的Kutools 首先，請 點擊下載並獲得 30 天免費試用 。

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

要使用VBA代碼刪除某個範圍內的非數字字符，請執行以下操作：

第 1 步：打開 VBA 模塊編輯器並複制代碼
  1. 按住 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. 在彈出 Kutoolsfor Excel 在對話方塊中，選擇要從中刪除非數字字元的範圍，然後按一下 OK.

結果

然後刪除選定範圍內的所有非數字字元。

如果您的資料包含帶有小數點的數字，您可以使用以下 VBA 腳本： 
  1. 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. 結果