可借助SUBSTITUTE/FIND、FILTERXML、VBA正则或TEXTSPLIT/XLOOKUP四种方法自动提取URL参数：一用LEFT/MID定位固定结构；二借FILTERXML解析XML化URL；三通过VBA自定义RegExtract函数实现正则匹配；四以TEXTSPLIT拆分后用XLOOKUP查找键值。
如果您在WPS表格中需要从一列URL字符串中提取特定参数（如utm_source、id、q等），但手动复制粘贴效率低下且易出错，则可借助文本函数组合实现自动化提取。以下是多种适用于不同URL结构的公式设置方法：
一、使用SUBSTITUTE与FIND配合LEFT提取固定位置参数值
该方法适用于参数名固定、且其值位于URL末尾或紧邻已知分隔符（如“=”）之后、无其他干扰字符的情形，通过替换符号简化定位逻辑。
1、假设A2单元格为URL：https://example.com/search?q=apple&id=123
2、在B2输入公式：=LEFT(SUBSTITUTE(A2,"&",""),FIND("=",SUBSTITUTE(A2,"&",""))+1)
3、再嵌套MID与FIND组合提取“q=”后的值：将上述结果作为中间步骤，最终公式为=TRIM(MID(SUBSTITUTE(A2,"&",REPT(" ",100)),(COLUMN(A1)-1)*100+1,100))并配合SEARCH查找“q=”位置
4、完整单步公式（提取q参数值）：=IFERROR(TRIM(MID(SUBSTITUTE(A2,"&",REPT(" ",100)),FIND("q=",A2)+2,100)), "")
二、使用FILTERXML函数提取指定参数（仅限WPS较新版本支持）
该方法将URL转换为类XML结构后解析，需先将URL中的“?”和“&”替换为XML标签格式，从而利用XPath精准定位参数名对应值。
1、确保WPS表格版本为2019或更高，且启用了FILTERXML函数
2、在B2输入公式：=FILTERXML(""&SUBSTITUTE(SUBSTITUTE(A2,"?","&"),"&","")&"
3、提取结果含“q=”，需进一步清理：嵌套SUBSTITUTE去除前缀，得=SUBSTITUTE(FILTERXML(""&SUBSTITUTE(SUBSTITUTE(A2,"?","&"),"&","")&"
4、为兼容无q参数的情况，外层包裹IFERROR：=IFERROR(SUBSTITUTE(FILTERXML(""&SUBSTITUTE(SUBSTITUTE(A2,"?","&"),"&","")&"
三、使用REGEXEXTRACT模拟正则提取（通过WPS宏自定义函数实现）
WPS原生不支持REGEXEXTRACT，但可通过VBA编写自定义函数RegExtract，使其具备正则匹配能力，适用于任意复杂参数模式（如带编码、多级嵌套、动态键名）。
1、按Alt+F11打开VBA编辑器，插入新模块
2、粘贴以下代码：Function RegExtract(text As String, pattern As String) As String Dim reg As Object: Set reg = CreateObject("VBScript.RegExp"): reg.Pattern = pattern: reg.Global = False: If reg.Test(text) Then RegExtract = reg.Execute(text)(0).SubMatches(0) Else RegExtract = "" End If End Function
3、返回表格，在B2调用该函数：=RegExtract(A2,"q=([^&]*)")
4、如需提取多个参数，可扩展pattern，例如提取id与q：=RegExtract(A2,"id=([^&]*)") 和 =RegExtract(A2,"q=([^&]*)")
四、使用TEXTSPLIT与XLOOKUP组合提取（WPS 2023版起支持）
该方法将URL按“&”和“=”拆分为二维数组，再通过XLOOKUP查找参数名所在行并返回右侧值，逻辑清晰、无需嵌套过深，适合结构规整的查询字符串。
1、确认WPS版本支持TEXTSPLIT与XLOOKUP函数
2、在B2输入公式：=XLOOKUP("q",TEXTSPLIT(TEXTSPLIT(A2,"?","#",1),{"&","="}),"", "", 0)
3、若参数值可能被URL编码（如%20），需额外嵌套DECODEURL函数（如存在）：=DECODEURL(XLOOKUP("q",TEXTSPLIT(TEXTSPLIT(A2,"?","#",1),{"&","="}),"", "", 0))
4、对缺失参数做容错处理：=IFERROR(DECODEURL(XLOOKUP("q",TEXTSPLIT(TEXTSPLIT(A2,"?","#",1),{"&","="}),"", "", 0)), "")
