excel vba将固定内容替换
1.将C列第13单元格以下所有“百”字符，替换为“裕”字2.将替换的“裕”字填充字为青色(原来列已有的“裕”字不作填充...
1.将C列第13单元格以下所有“百”字符，替换为“裕”字
2.将替换的“裕”字填充字为青色(原来列已有的“裕”字不作填充 展开
2.将替换的“裕”字填充字为青色(原来列已有的“裕”字不作填充 展开
1个回答
展开全部
Sub tihuan()
Dim cr&, rng As Range
cr = Range("c13").End(xlDown).Row
For Each rng In Range("c13:c" & cr)
If rng Like "*百*" Then
rng = Replace(rng, "百", "裕")
rng.Interior.ColorIndex = 8
End If
Next
End Sub
Dim cr&, rng As Range
cr = Range("c13").End(xlDown).Row
For Each rng In Range("c13:c" & cr)
If rng Like "*百*" Then
rng = Replace(rng, "百", "裕")
rng.Interior.ColorIndex = 8
End If
Next
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
