<em>excel</em> 选择一个单元格 所在行列变色 怎么设置-excel 列的代码,ex

代码抄如下，供百参考：
Sub 变色度()
Selection.EntireRow.Select '选中整行知
Selection.Interior.Color = 65535 '设置成黄色道
End Sub

根据描述可以使用VBA的selection change 事件来来处理

Excel版本参考：2010

1、ALT+F11，进入自VBE编辑器

2、双击Sheet1标签，粘贴如下代码：

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

On Error Resume Next

Cells.FormatConditions.Delete

With Target.EntireRow.FormatConditions

.Delete

.Add xlExpression, , "TRUE"

.Item(1).Interior.ColorIndex = 9

End With

With Target.EntireColumn.FormatConditions

.Delete

.Add xlExpression, , "TRUE"

.Item(1).Interior.ColorIndex = 9

End With

End Sub

3、关闭VBE对话框，百返回工作表

4、点击单元格，查看效度果
工具，宏，Visual Basic 编辑器，进入VB界面在左上角的窗口中选择抄你要实现知功能的Sheet，右键，查看代码在右边出现的窗口里粘贴如下代码：Dim rr As Integer
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If rr > 0 Then Columns(rr).Interior.Pattern = xlNone
Selection.EntireColumn.Interior.ColorIndex = 4
rr = Selection.Column
End Sub

功能实现了。如果想换颜色，将道4改为其他数字看看。

你要说清楚填充百颜色，边框颜色或者字体颜色。
各种很多的。如果度你家不熟悉代码，估计知说了你也够呛能理道解。
举例说，字体颜色，可以使版用range.font.color进行设定。(VBA代码)
建议用RGB模式代码，配色的权时候方便一些。