excel 为所有工作表的某一单元格填充颜色
excel中有多个工作表，如何对不同表中的具有相同内容的单元格进行填充颜色？如几个表中某单元格内容均为 “A”，则将所有这些单元格填充某一颜色？
可以使用VBA来完成，打开工作簿，按Alt+F11,双击左侧工程窗口中的某个工作表，将下面代码复制到右侧的代码窗口，再点击上面的运行按钮，即可对所有工作表中单元格内容为A的单元格填充紫蓝色
sub FillA()
Dim rng As Range, i As Integer, iworksheets As Integer
iworksheets = ThisWorkbook.Sheets.Count
For i = 1 To iworksheets
For Each rng In Worksheets(i).UsedRange
If rng = "A" Then
rng.Interior.Colorindex =17
End If
Next rng
Next i
End Sub
sub FillA()
Dim rng As Range, i As Integer, iworksheets As Integer
iworksheets = ThisWorkbook.Sheets.Count
For i = 1 To iworksheets
For Each rng In Worksheets(i).UsedRange
If rng = "A" Then
rng.Interior.Colorindex =17
End If
Next rng
Next i
End Sub
温馨提示：答案为网友推荐，仅供参考
第1个回答 2013-10-29
如果单元格位置固定且不需要条件判断的话，可以将需要填充的工作表设置为工作组
方法：按住 CRLT ，然后鼠标点选需要填充的工作表，完成后操作其中一个工作表即可同时应用到所有选中的工作表，
如果需要判断的话，可以用VBA来做。这个你得说清楚怎么去判断是否需要填充。追问
方法：按住 CRLT ，然后鼠标点选需要填充的工作表，完成后操作其中一个工作表即可同时应用到所有选中的工作表，
如果需要判断的话，可以用VBA来做。这个你得说清楚怎么去判断是否需要填充。追问
单元格位置不是固定的，每个表里面都只有一个单元格是符合要求的，且所有表都包含这个单元格，这样的单元格都去填充为红色，可以实现吗？
追答得用VBA来做。
说说怎么找到这个符合要求的单元格？也就是说这个单元格的要求是什么？
比如说 单元格里的内容是"A"
追答代码在附件里面，也不知道你会不会用。
第2个回答 2013-10-29
我的是2013版，应该一样，开始-条件选择-突出显示-重复值
第3个回答 2013-10-29
好复杂呀！
不过你可以合并表单后，再对相同内容进行填充颜色！用条件格式！
不过你可以合并表单后，再对相同内容进行填充颜色！用条件格式！
相似回答