是否有人知道如何更改电子表格中单元格的内容,具体取决于在同一单元格中找到的内容,然后使用VBA更改颜色方案
例如
单元格值= N / A#
新细胞价值将=未上一次报告
配色方案=黑色&黄色背景上的大胆文字
或者
单元格值=零或单元格中没有任何内容,所以空白
新单元格值=先前报告中未提供更新
配色方案=白色&红色背景上的大胆文字
还有其他单元格值,这些值保持不变。
提前感谢您提供任何帮助,非常感谢
答案 0 :(得分:1)
选择单元格并运行:
Sub repair()
Dim r As Range
For Each r In Selection
If r.Text = "#N/A" Then
r.Value = "Not On Previous Report"
r.Interior.ColorIndex = 27
r.Font.FontStyle = "Bold"
End If
If r.Value = "" Or r.Value = 0 Then
r.Value = "No Update Provided On Previous Report"
r.Interior.ColorIndex = 3
r.Font.FontStyle = "Bold"
r.Font.ColorIndex = 2
End If
Next r
End Sub