如何在Excel中刪除單元格中的非字母字元？

本手冊將逐步向您展示如何清除Excel資料中特定單元格中的任何非字母字元，從而清理您的Excel資料。在處理包含不需要的符號、數字或特殊字元的資料時，此方法非常有用，可以使您的資料保持乾淨和井然有序。

Excel是一款有效的用於資料分析、報告和記錄儲存的工具。但有時，資料可能來自不同的來源，或透過產生混合內容（如非字母字元）的方法生成。手動刪除這些不需要的字元可能需要很長時間，尤其是在處理大型資料集時。在這種情況下，我們的教程可以幫上大忙。在我們開始之前，務必瞭解Excel及其功能的基礎知識。本教程適合所有技能水平的使用者，無論您是經驗豐富的Excel使用者，還是希望提高知識的初學者。

刪除單元格中的非字母字元

在這裡，我們將首先建立一個VBA模組，然後執行它來完成任務。讓我們來看一個簡單的過程，學習如何在Excel中刪除單元格中的非字母字元。

步驟1

考慮一個Excel工作表，其中單元格包含非字母字元，類似於下面的影像。

首先，右鍵單擊工作表名稱，然後選擇“檢視程式碼”以開啟VBA應用程式。

右鍵單擊 > 檢視程式碼。

步驟2

然後單擊“插入”，選擇“模組”，然後將以下程式碼複製到文字框中。

插入 > 模組 > 複製。

程式碼

Sub RemoveNotAlphas()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "Remove Non Alpha"
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 "[a-z.]" Or xTemp Like "[A-Z.]" Then
         xStr = xTemp
      Else
         xStr = ""
      End If
      xOut = xOut & xStr
   Next i
   Rng.Value = xOut
Next
End Sub