Skip to main content

Kutools for Office — 一套工具,五種功能。完成更多工作。

如何從 Excel 中的名字單元格中刪除稱謂?

Author Xiaoyang Last modified

在日常辦公或數據清理任務中,您可能會經常遇到 Excel 列表,其中每個人的名字前面都帶有稱謂,例如先生、小姐、夫人等。為了準備營銷活動、生成報告或只是標準化您的數據集,您可能需要刪除這些稱謂,僅保留實際的名字。例如,將「王先生」轉換為「王」於整列數據中。在 Excel 中高效完成此操作可以節省大量的手動工作,特別是在處理大規模數據集或稱謂格式不一致的情況下。

a screenshot showing the original names with salutation and the names with salutation removed

使用公式從名字單元格中刪除稱謂
使用 VBA 宏批量刪除稱謂
使用 Excel 的快速填充功能刪除稱謂
使用公式將稱謂和名字分離到不同的列


使用公式從名字單元格中刪除稱謂

使用 Excel 公式是從名字單元格中刪除稱謂的簡單方法。當所有名字都遵循相同的模式時,這種解決方案最合適:稱謂在前,後面跟著一個空格,然後是全名。這個方法速度快,不需要額外的插件,並且對於中小型列表非常有效。但是,它可能無法處理更複雜的變體,例如多詞稱謂或不一致的格式。

要從名字單元格中刪除稱謂,請執行以下步驟:

1. 在名字列表旁邊的空白單元格中(假設您的數據從 A2 開始),輸入以下公式:

=RIGHT(A2, LEN(A2) - FIND(" ",A2))

該公式定位單元格中的第一個空格並提取其右側的所有文本,有效地刪除了稱謂。

2. 按 Enter 確認公式。接下來,拖動填充柄(單元格右下角的小方塊)向下填充此公式到您列中的所有單元格。

a screenshot of using the formula to get names without salutations

提示與注意事項如果有些名字不含稱謂(沒有空格),該公式可能會返回錯誤。在應用此方法之前,請檢查您的數據是否有任何不一致之處。


使用 VBA 宏批量刪除稱謂

對於大型數據集,或者在稱謂格式不一致或長度各異的情況下,使用 VBA 宏是一個有效的解決方案。使用 VBA,您可以一次性刪除各種類型的稱謂,這對於清理大型郵件列表、人力資源數據庫或任何手動公式不切實際的場景特別有用。

以下是從選定範圍內每個名字的開頭刪除常見稱謂(如先生、女士、夫人、博士、教授、小姐)的示例 VBA 腳本。您可以輕鬆擴展列表以包含其他稱謂。

1. 點擊開發工具 > Visual Basic 打開VBA 編輯器。在 VBA 編輯器中,進入插入 > 模塊,並將以下代碼粘貼到模塊窗口中:

Sub RemoveSalutationBulk()
    Dim WorkRng As Range
    Dim Rng As Range
    Dim cellValue As String
    Dim arrSalutations As Variant
    Dim i As Integer
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select the range to remove salutations from:", xTitleId, WorkRng.Address, Type:=8)
    
    arrSalutations = Array("Mr. ", "Mr ", "Mrs. ", "Mrs ", "Ms. ", "Ms ", "Miss ", "Dr. ", "Dr ", "Prof. ", "Prof ")
    
    For Each Rng In WorkRng
        cellValue = Rng.Value
        For i = LBound(arrSalutations) To UBound(arrSalutations)
            If InStr(1, cellValue, arrSalutations(i), vbTextCompare) = 1 Then
                cellValue = Mid(cellValue, Len(arrSalutations(i)) + 1)
                Exit For
            End If
        Next i
        Rng.Value = cellValue
    Next Rng
End Sub

2按下 F5 或點擊 Run button 運行 按鈕執行代碼。將出現一個對話框,要求您選擇包含要處理名字的範圍——突出顯示適當的單元格並點擊 確定.

注意此宏只會刪除位於單元格開頭的稱謂,不區分大小寫。如果某些名字使用了不常見的稱謂,您可以將其添加到代碼中的 arrSalutations 數組中。在使用 VBA 進行批量操作之前,務必備份您的數據以防不必要的更改。


使用 Excel 的快速填充功能刪除稱謂

從 Excel 2013 開始,快速填充功能使得通過識別和應用數據模式來去除稱謂變得容易。這是一種快速、直觀的方法——特別適合偏好視覺化、交互式解決方案並且數據相對結構良好的用戶。如果您的數據集不大並且在稱謂和名字之間有清晰重複的模式,快速填充非常理想。然而,在數據高度不規則或存在不一致的情況下,它可能效果不佳。

1. 在名字旁邊創建一個新列。在第一個數據單元格旁邊的單元格中(例如,如果 A2 是「王先生」,在 B2 中輸入「王」——去掉稱謂)。

2. 開始在 B3 中輸入下一個值。一旦 Excel 識別出模式(通常在輸入 1-2 個條目後),它會根據您的示例建議填滿該列的剩餘單元格。

3. 只需按 Enter 接受建議,快速填充將自動完成該列的其餘部分,為您刪除稱謂。

如果快速填充功能未自動出現,您可以手動啟用它:點擊最後一個條目下方的單元格,然後點擊數據 > 快速填充 或使用快捷鍵 Ctrl+E

提示快速填充對不一致情況敏感。雙重檢查結果是否存在錯誤,特別是當某些名字不符合預期模式時。此功能不會自動更新;如果原始名字發生變化,您需要重新進行快速填充操作。

優點 無需記憶公式,非常直觀,對於具有明顯模式的列表快速有效。
局限性 不適合非常大的數據集或模式不均勻的情況,僅適用於 Excel 2013 或更高版本。


使用公式將稱謂和名字分離到不同的列

如果您想將稱謂和名字的其餘部分分離到兩個不同的列,而不是簡單地刪除稱謂,Excel 公式也可以幫助實現。當您仍然需要保留稱謂用於報告或其他使用場景時,此方法特別有用,例如個性化通信或按稱謂分段。這些公式在數據始終使用單一固定分隔符(例如空格)的情況下效果最佳。

1. 為了提取稱謂,在空白單元格中輸入以下公式(例如,如果您的名字在 A 列中,則在 C2 中輸入):

=LEFT(A2, FIND(" ",A2)-1)

這會提取第一個空格左側的文本,隔離稱謂。

拖動填充柄向下複製公式到其他行。所有稱謂都將顯示在新列中:

a screenshot of using a formula to extract salutations from given names

2. 為了僅提取名字,在下一空白列中輸入以下公式(例如 D2):

=MID(A2, FIND(" ",A2)+1,1024)

此公式獲取第一個空格後的所有文本,即實際的名字。同樣,拖動填充柄向下填充其他行。

a screenshot of using another formula to extract names from given names

提示您可以根據數據的實際位置調整公式中的列引用(A2 等)。如果名字字段為空或不匹配預期格式,可能會導致公式錯誤,請小心處理。

最佳 Office 生產力工具

🤖 Kutools AI 助手:以智能執行為基礎,革新數據分析 生成程式碼 創建自訂公式 分析數據並生成圖表 調用 Kutools 增強函數
熱門功能查找、選取項目的背景色或標記重複值刪除空行合併列或單元格且不遺失數據四捨五入(免公式)...
高級 LOOKUP多條件 VLookup多值 VLookup多表查找模糊查找...
高級下拉列表快速創建下拉列表 依賴型下拉列表 多選下拉列表...
列管理器添加指定數量的列移動列切換隱藏列的顯示狀態比較區域及列...
精選功能網格聚焦 設計檢視 增強編輯欄 工作簿及工作表管理器 資源庫(快捷文本) 日期提取器 合併資料 加密/解密儲存格 按列表發送電子郵件 超級篩選 特殊篩選(篩選粗體/傾斜/刪除線...)...
15 大工具集12 項文本工具添加文本刪除特定字符…)50+ 儀表 類型甘特圖等)40+ 實用 公式基於生日計算年齡等)19 項插入工具插入QR码根據路徑插入圖片等)12 項轉換工具金額轉大寫匯率轉換等)7 項合併與分割工具高級合併行分割儲存格等)...及更多
使用 Kutools,語言任你選 — 支援英語、西班牙語、德語、法語、中文及超過40 種語言!

運用 Kutools for Excel,全面提升您的 Excel 技能,體驗前所未有的高效。 Kutools for Excel 提供超過300 項進階功能,讓您提升工作效率、節省時間。 點此尋找您最需要的功能...


Office Tab 為 Office 帶來分頁介面,讓您的工作更加輕鬆簡單

  • 在 Word、Excel、PowerPoint 中啟用分頁編輯與閱讀
  • 在同一視窗的新分頁中打開與創建多份文件,而非開啟新視窗。
  • 提升您的生產力50%,每日可幫您減少數百次鼠標點擊!

所有 Kutools 外掛,一次安裝

Kutools for Office 套裝整合了 Excel、Word、Outlook 和 PowerPoint 的外掛,外加 Office Tab Pro,非常適合需要跨 Office 應用程式協同作業的團隊。

Excel Word Outlook Tabs PowerPoint
  • 全合一套裝 — Excel、Word、Outlook及 PowerPoint 外掛 + Office Tab Pro
  • 一鍵安裝,一份授權 — 幾分鐘完成設置(支援 MSI)
  • 協同運作更順暢 — Office 應用間無縫提升生產力
  • 30 天全功能試用 — 無需註冊、無需信用卡
  • 最超值 — 一次購買,節省單獨外掛費用