[求助]excel如何突出显示修改单元格字体的颜色?

njlggz

   word设置了修订之后，任何修改都会显示出来，非常清楚直观。excel就很麻烦，什么共享工作簿、工作区、突出显示修订等等，怎么设置也无法达到word这样的效果。
       我现在其他什么都不要，只要求对excel表格中任何一个单元格内容进行修改，就能把这个单元格的字体变成红色或者其他颜色。
       至于其他的修改就无所谓了，比如增删行列、修改行高等等等等，因为本身就很少。
       不知有没有高手能帮助解决？谢谢了！

[此贴子已经被作者于2008-3-31 9:36:41编辑过]

njlggz

谢谢楼上。自动加粗？能不能是颜色呢，加粗不太明显啊。

njlggz

不好意思，我对这个不太懂，能不能简单告诉我在哪里输入这些东西？是在脚本编辑器里面吗？在什么位置输入呢？谢谢了。

njlggz

哈哈，搞定了！谢谢你了！只是……现在是改变了单元格的颜色，字体颜色没改变，也差不多可以了……

njlggz

狂晕，如果设置成共享，这个就不能用了，算了，基本解决问题了。

lenghonghai

使用工作表事件

Private Sub Worksheet_Change(ByVal Target As Range)
    Target.Font.Bold = True
End Sub
但是要注意这个代码的作用是只要你在单元格内输入数值都会自动加粗。好象也不能达到很好的效果。

[此贴子已经被作者于2008-3-31 9:37:25编辑过]

lenghonghai

Private Sub Worksheet_Change(ByVal Target As Range)
    Target.Font.Bold = True

target.interior.colorindex=5

End Sub

lenghonghai

QUOTE:

以下是引用njlggz在2008-3-31 9:56:24的发言：
不好意思，我对这个不太懂，能不能简单告诉我在哪里输入这些东西？是在脚本编辑器里面吗？在什么位置输入呢？谢谢

QUOTE:

右键当前工作表的标签，出现快捷菜单，选择查看代码命令，进入代码编辑状态，复制上述代码就可以了。

QUOTE:

然后在工作表中输入或者改变一个单元格的数值测试一下。

lenghonghai

QUOTE:

以下是引用njlggz在2008-3-31 10:05:14的发言：
哈哈，搞定了！谢谢你了！只是……现在是改变了单元格的颜色，字体颜色没改变，也差不多可以了……

Private Sub Worksheet_Change(ByVal Target As Range)
Target.Font.Bold = True
Target.Interior.ColorIndex = 5
Target.Font.Color = vbRed
End Sub

其实这些小问题，比如改变字体颜色，改变背景颜色你只要通过录制宏自己就可以学会如何修改了。

lavill

代码很好用，可惜和保护工作表不兼容。
我设了工作表保护，下发后只有指定的单元格才允许别人修改，并突出显示。请问可能通过优化代码实现吗？谢谢