如何将excel中所有红色底色的格子变成黄色底色?
发布网友
共3个回答
热心网友
ctrl+h，替换，选择格式，查找底色，替换为底色。
然后点shift，选择第一个sheet，在选择最后一个sheet，把所以sheet都选中。全部替换即可
热心网友
不知道你的红是哪种红、黄是哪种黄，可能需要修改一下3和6，代码如下：
Option ExplicitSub xxx()
Dim st As Worksheet, cl As Range
For Each st In Sheets
For Each cl In st.UsedRange.Cells
If cl.Interior.ColorIndex = 3 Then cl.Interior.ColorIndex = 6
Next cl
Next st
End Sub
热心网友
代编、修改宏代码。追问求帮忙~
追答相信你已得到答案。
