求助提取关键字合并到一个单元格

a6681316 · 发表于 2018-9-13 13:23

麻烦大神们帮帮忙，我想提取ADCD这几个关键字，有几个提取几个放到一个单元格里面去

具体的图片和附件请参考

a6681316 · 发表于 2018-9-13 13:30

自己顶下，麻烦大神解决下

a6681316 · 发表于 2018-9-13 14:04

在顶下，来个大牛解决下

Yalishanda30 · 发表于 2018-9-13 14:06

试试看行不行？

a6681316 · 发表于 2018-9-13 14:52

Yalishanda30 发表于 2018-9-13 14:06
试试看行不行？

目前这个表可以？问个问题，如果是提取字符如何更改代码.....比如找“我”这个字符
代码改成以下的无法提取...

If InStr(Str, "我") Then
b = Mid(Str, Application.WorksheetFunction.Find("B", Str, 1), 1)

Yalishanda30 · 发表于 2018-9-13 16:07

本帖最后由 Yalishanda30 于 2018-9-14 08:20 编辑

a6681316 发表于 2018-9-13 14:52
目前这个表可以？问个问题，如果是提取字符如何更改代码.....比如找“我”这个字符
代码改成以下的无法 ...

用正则匹配吧，自己搜论坛，很多教程可参考，代码改成正则匹配了
匹配“我” 把.Pattern = "[A-Z]"改成.Pattern = "[我]"

		自动登录	找回密码
密码			免费注册