发布网友
共2个回答
热心网友
选定数据——条件格式——新建规则——使用公式确定要设置的单元格格式——输入公式:=MOD(A1,0.5)=0 ——点击格式——选择字体——字体颜色设置为红色——确定确定即可!
热心网友
给出如下表格式和VBA代码(第一行第一列建议没有空值):
Sub ABS5()
For Ron = 1 To Range("A1").End(xlDown).Row
For Clm = 1 To Range("A1").End(xlToRight).Column
If Cells(Ron, Clm).Value * 10 Mod 5 = 0 Then
Cells(Ron, Clm).Font.Color = RGB(248, 1, 3)
Cells(Ron, Clm).Font.Bold = 1
End If
Next
Next
End Sub