用VBA代码如何写：查找某区域中符合条件的单元格，并全部自动替换为一个固定的文字.如下图
2个回答
展开全部
很简单代码给你，不过现在电脑关了不能测试，可能会有错误
sub a()
dim rng as range, cl as range
set rng = range("G1:IXN1")
for each cl in rng
if cl.interior.colorindex = 3 then cl.value = "达"
next
end sub
sub a()
dim rng as range, cl as range
set rng = range("G1:IXN1")
for each cl in rng
if cl.interior.colorindex = 3 then cl.value = "达"
next
end sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
csdn看看
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
