我是有一列是日期,当这列日期=今天的时候,这行的底色就改变
追答给你一个方法,用VBA写的代码,在EXCEL中按ALT+F11键.进入到VBA编辑器里面.从左侧工程栏里找到ThisWorkbook文件后,双击鼠标找打开,把下面代码粘贴到里面运行.
你试试.
代码如下:
'自动生成所有数据行间隔的颜色输入
'编写人joims.hu,编写日期:2012年4月24日晚23:22分
Public Sub Color()
Dim rng As Range
Dim i, j As Integer
str_C1 = InputBox("请输入日期所在的列!")
str_C2 = InputBox("请输入要填充的日期!注意填写与你要填充颜色的日期格式相同!")
Set rng = Range(str_C1 & "65536").End(xlUp)
j = rng.Row
For i = 1 To j
If str_C2 = Range(str_C1 & i).Text Then
Range(i & ":" & i).Select
Selection.Interior.ColorIndex = 42
End If
Next i
End Sub
要说明白的是,要你输入的两个内容:
第一,输入你要查找的列,比如,工作表中,日期所在列为A,就输入A,就好了.
第二,输入要查找的内容时,比如你EXCEL表中显示的是什么格式就在第二个里面输入什么,比如,表中显示,4月24日,就输出4月24日,而不是4-24,如果显示的是4.24就不能输出4月24日.这个你试试就什么明白.
然后按F5键 运行此段代码.输入后就OK了.
谢谢.希望能帮助你.
对了,还有一点就是,你保存时要保存成,XLSM格式的.这个可以在EXCEL保存类型里选取的.
如果不是你EXCEL就不会保存这段代码,这点请注意.