怎样在excel表格中用鼠标选定内容后自动变颜色?

2024-11-10 04:41:29

推荐回答（3个）

回答（1）：

可以随便写点脚本，打开excel文件，按alt+F11,进入vba的编程环境，

在左边的excel对象中选择sheet1(假如你是操作sheet1表的话)，在右边的编译窗口上面的list中，左边选择worksheet,右边选择selectionchange.
输入以下代码：
With Selection.Interior
.ColorIndex = 40
.Pattern = xlSolid
End With
这时你一点击excel的单元格，就变为了黄色啦，要设置其他颜色就根据自己的习惯修改参数就可以啦。只要修改ColorIndex中的数字就可以啦

回答（2）：

用万能的VBA来做。做一个小程序，当鼠标在C列上点击时，当前单元格的填充色设定为咖啡色。代码如下：
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If ActiveCell.Column = 3 Then
With Selection.Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.ThemeColor = xlThemeColorAccent6
.TintAndShade = 0.399975585192419
.PatternTintAndShade = 0
End With
End If
End Sub

回答（3）：

与windows桌面主题有关。