如何去除表格地址列单个单元格内的重复地址内容？

以下方案均适配「单元格内为同一个完整地址连续重复拼接」的场景，可按需选择：

方案1：Excel / WPS 表格处理 #

方法A：正则自定义函数（适配所有版本） #

1. 按Alt+F11打开VBA编辑器，右键点击当前工作簿 → 「插入」→「模块」
2. 粘贴如下代码后关闭编辑器：

Function RemoveDuplicateAddr(rng As Range) As String
    Dim regEx As Object
    Set regEx = CreateObject("VBScript.RegExp")
    regEx.Pattern = "^(.+?)\1+$"
    regEx.Global = True
    RemoveDuplicateAddr = regEx.Replace(rng.Value, "$1")
End Function

3. 回到表格，在空白列对应单元格输入公式 =RemoveDuplicateAddr(A2)（A2为待处理的第一个地址单元格），下拉填充即可完成批量清理。

方法B：Power Query（无需写代码，适配2016及以上版本） #

1. 选中地址列，点击「数据」选项卡 → 「从表格/范围」导入Power Query编辑器
2. 依次点击「添加列」→「自定义列」，输入自定义列公式：
   = Text.RegexReplace([Address], "^(.+?)\1+$", "$1")
3. 删除原有地址列，将新列重命名为Address后，点击「关闭并上载」即可同步回表格。

方案2：Google Sheets 处理 #

无需额外配置，直接在空白单元格输入公式下拉即可：
=REGEXREPLACE(A2, "^(.+?)\1+$", "$1")

方案3：Python 批量处理超大量数据 #

如果数据量过万条，可使用pandas批量处理CSV/Excel文件，代码示例：

import pandas as pd
import re

# 读取源文件，替换为你的文件路径
df = pd.read_excel("raw_address.xlsx")

def clean_dup_address(s):
    return re.sub(r"^(.+?)\1+$", r"\1", str(s).strip())

df["Address"] = df["Address"].apply(clean_dup_address)

# 导出清理后的文件
df.to_excel("cleaned_address.xlsx", index=False)

内容的提问来源于stack exchange，提问作者Shashidhar R