| 查看: 1244 | 回复: 3 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
[求助]
如何在excel中实现：成批量查找字符串中指定位置的字符，并标为红色 已有2人参与
|
||
|
各位大侠， 想请教一下大家，如何在excel中实现：成批量查找字符串中指定位置的字符，并将查找到的字符标为红色。 如图所示：列1中有上万行待查找的字符串，列2中是想要在列1字符串中中查找的位置。想要实现的目的：在列1中查找列2指定位置的字符，并用红色标出（图中所示红色为我自己手动标出的）。 不知道大家有没有什么好的办法，恳请各位大侠帮我出出主意，非常非常非常感谢大家！！！   example.PNG |
回复此楼» 猜你喜欢
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有9人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有4人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有6人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有4人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有5人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有5人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有8人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有10人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有6人回复
-
售SCI一区文章，我:8 O5 51O 54,科目齐全,可+急
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 怎么样设置matlab在excel中的输出位置
已经有10人回复
deephill
铁杆木虫 (职业作家)
- 应助: 59 (初中生)
- 金币: 5262.3
- 散金: 100
- 红花: 16
- 帖子: 4425
- 在线: 425小时
- 虫号: 305318
- 注册: 2006-12-09
- 性别: GG
- 专业: 微量元素地球化学
4楼2015-02-08 21:06:02
me_yu
木虫 (正式写手)
- 应助: 26 (小学生)
- 金币: 3369.5
- 散金: 350
- 红花: 7
- 沙发: 1
- 帖子: 895
- 在线: 468.1小时
- 虫号: 2533501
- 注册: 2013-07-05
- 专业: 计算机软件
2楼2015-02-08 00:16:50
deephill
铁杆木虫 (职业作家)
- 应助: 59 (初中生)
- 金币: 5262.3
- 散金: 100
- 红花: 16
- 帖子: 4425
- 在线: 425小时
- 虫号: 305318
- 注册: 2006-12-09
- 性别: GG
- 专业: 微量元素地球化学
【答案】应助回帖
感谢参与，应助指数 +1
|
楼上的很好 我录制了个vba ，修改了下，也可以。 你把下面的vba 代码贴进去也可以，你也可以根据情况自己修改。 '=============================== Sub Macro1() ' ' Macro1 Macro For i = 1 To Range("a65536"  .End(xlUp).Row'' 字符串放在 A 列，开始变红的位置数据 放在 B 列。 Range("A" & i).Select ActiveCell.FormulaR1C1 = Range("A" & i).Value With ActiveCell.Characters(Start:=Range("B" & i).Value, Length:=1).Font .Name = "Arial" .FontStyle = "常规" .Size = 10 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .Color = -16776961 .TintAndShade = 0 .ThemeFont = xlThemeFontNone End With Next i End Sub '================== |
3楼2015-02-08 21:04:50
