此乃需要代码实现： 右键Sheet名,查看代码,复制下列代码Private Sub Worksheet_Change(ByVal Target As Range)Target.Font.Color = vbRedEnd Sub关闭窗口 返回表格，见效果。
工具，修订，这个命令即可
