excel中，if(A2=0,A1,A2)并把A2字体改成红色 救教

用vba处理
Sub 运行()
Dim a As Integer, b As Integer, c As Integer, d As Integer
a = Sheet1.UsedRange.Rows.Count
b = Sheet1.UsedRange.Columns.Count
For c = 2 To a
For d = 2 To b
If Cells(c, d) = 0 Then
Cells(c, d) = Cells(c - 1, d).Value
Cells(c, d).Font.ColorIndex = 3
End If
Next d
Next c
End Sub

EXCEL中有一个格式样式,里面就可以把特定的单元格中的字体变色.

把单元格设置条件格式，就可以了

假设原数据A列上述公式输在B列当中，则可如下设置条件格式；

选中B列单元格——格式——条件格式，打开条件格式对话框，将条件设置成“单元格数值”“不等于”最后的数据栏里填“=A1”，然后将下边的格式设置成红色字体，点确定即可