如何改变excel中的颜色，就是鼠标点在什么地方，有提示的地方。如图c字母和1数字上的淡黄色！！！

Question

如题所述

Answer 1

百度经验有 一种方法, 不过 你用了就 不能复制 ，

http://jingyan.baidu.com/article/066074d6431122c3c21cb0ce.html?st=2&os=0&bd_page_type=1&net_type=2

或者 你直接在 工作表 代码区 写入代码，启用宏 可使用,不影响复制

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.Color = xlNone
 Rows(Target.Row).Interior.Color = vbCyan
 Columns(Target.Column).Interior.Color = vbCyan
End Sub

追问

好的 每次其他的表格如何让它自动运行呢？？

追答

把代码放到其他的表格里

或者 宏写成 打开Excel 即启动， 写成Activesheet
但是，注意： 你以后别想对 单元格再标颜色了 , 这玩意不要 随便用, 只是辅助而已

Answer 2

这个是选中颜色，程序默认颜色，无法更改，如果确实要更改的话，尝试更改电脑系统的颜色追问

能告诉下该系统的哪个颜色啊？？

追答

那就得咨询微软公司拉~~

Answer 3

那个是软件吗，默认的无法修改的追问

这个是excel上的截图，我寻思着换个自己喜欢的颜色，但是就是不晓得怎么修改。

追答

不能改，你可以让你的行和列高亮显示，这个可做到其他颜色显示

追问

请问怎么弄成这样呢？？

追答

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

'If Application.CutCopyMode Then Exit Sub '如果处于选取状态则退出程序

Dim Rng As Range

Set Rng = Target.Range("a1")

Cells.Interior.ColorIndex = 0 '清除所有背景色

Rng.EntireColumn.Interior.ColorIndex = 40 '设置当前列颜色

Rng.EntireRow.Interior.ColorIndex = 38 '设置当前行颜色

End Sub

打开EXCEL文件，在右击工作表标签，在弹出的菜单中选择“查看代码”将以上代码放进去，在启用宏，安全级别调整下就能使用了

追问

好的 。可以让每次打开其他的表格自动加载这个程序吗啊？？

追答

那你就保存为个人宏工作薄，开机就启动