如何快速提取excel中的中文

发布网友 发布时间:2022-04-19 21:21

我来回答

2个回答

热心网友 时间:2023-09-01 10:40

excel如何快速提取?

热心网友 时间:2023-09-01 10:40

简单易用,首选正则表达式!假如你要提取的数据在A列(任意列也一样用法),下面代码粘贴到VBA中。PS:经本人编写后测试,可用!  如果解决了你问题,给采纳最佳答案啊!!!

Sub tiqu()
Set regx = CreateObject("vbscript.regexp")
regx.Global = True
regx.Pattern = "[^\u4e00-\u9fa5]"

j = Cells(Rows.Count, 1).End(xlUp).Row
For Each Rng In Range("a2:a" & j)
n = n + 1
Cells(n + 1, "B") = regx.Replace(Rng, "")
Next
End Sub

声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。
E-MAIL:11247931@qq.com