如何在Excel中去除數字開頭的單引號？

MS Excel 微軟技術高階Excel函式

如果您曾經在Excel電子表格中遇到過以不需要的單引號開頭的數字資料，那麼您來對地方了。這些單引號有時可能是資料匯入或來自外部來源的結果，它們可能會干擾計算或資料格式。

本循序漸進的教程將向您展示如何有效且正確地從資料中消除開頭的單引號，確保資料準確並準備好進行進一步分析。本文不假設您有任何Excel的預備知識，因此初學者和高階使用者都會發現它易於理解。讓我們現在開始，擺脫那些惱人的單引號吧！

去除數字開頭的單引號

在這裡，我們將首先建立一個VBA模組，然後選擇單元格範圍來完成任務。讓我們來看一個簡單的過程，學習如何在Excel中去除數字開頭的單引號。

步驟1

考慮一個Excel工作表，其中包含類似於下圖所示帶有單引號的單元格。

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

右鍵單擊 > 檢視程式碼。

步驟2

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

插入 > 模組 > 複製。

程式碼

Sub remove_Apostrophe()
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "Remove Leading Apostrophe"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeConstants, xlNumbers)
For Each rng In WorkRng
   If Not rng.HasFormula Then
      rng.Formula = rng.Value
   End If
Next
End Sub