发布网友 发布时间:2022-04-23 12:24
共3个回答
热心网友 时间:2023-08-13 14:29
参见下图,B2="("&TEXTJOIN(")(",1,FILTERXML("<A>"&SUBSTITUTE(SUBSTITUTE(A2,"(","<B>"),")","</B>")&"</A>","A/B[.!=0+.]"))&")"——下拉填充。
也可以:
Sub 正则替换()
Set regx = CreateObject("vbscript.regexp")
For Each aaa In [a2:a6]
With regx
.Global = True
.Pattern = "(-?\d+\.?\d+)"
aaa.Offset(0, 3) = .Replace(aaa, "")
End With
Next
End Sub
热心网友 时间:2023-08-13 14:29
把数据复制到word,查找,查找内容:([0-9.]{1,}),点高级,在勾选使用通配符,点查找下一处,点替换,点全部替换,完了复制回excel
热心网友 时间:2023-08-13 14:30
方法一,选中单元格,按delete;方法二,选中单元格,右击,点清楚内容