如何将excel中所有红色底色的格子变成黄色底色？

Question

有很多页的表格，现在需要将所有红色底色变成黄色，求个可用的宏，多谢！

Answer 1

ctrl+h，替换，选择格式，查找底色，替换为底色。

然后点shift，选择第一个sheet，在选择最后一个sheet，把所以sheet都选中。全部替换即可

Answer 2

不知道你的红是哪种红、黄是哪种黄，可能需要修改一下3和6，代码如下：

Option Explicit
Sub 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

Answer 3

代编、修改宏代码。追问

求帮忙~

追答

相信你已得到答案。