excel真么设置让符合条件的列仅边框高亮？

臭味胡豆 · 发表于 2015-8-1 23:16

各位高手，请教个问题。
excel中的第三行每个单元格都是一个日期（格式无所谓），想通过这个单元格来判定是不是当天日期。如果是当天日期（例如2015-8-1），就把该列的边框设为高亮（红色或其他颜色），用于区别其他列。如图。
谢谢。

臭味胡豆 · 发表于 2015-8-1 23:17

最终达到，无论那天打开这个excel，都会把当天日期的那列高亮出来。谢谢了。

cqlpjxx · 发表于 2015-8-2 08:07

实现方法：1.定义名称co=MATCH(TODAY(),Sheet1!$A$3:$Q$3),得到当天日期所在列标
2.条件格式，公式：column()=co,把边框设置好，确定

cqlpjxx · 发表于 2015-8-2 08:18

也可以直接把条件格式公式设置为：=COLUMN()=TODAY() - 42209，不过42209这个常数要根据表格进行调整，得到当前日期所在列

huang1314wei · 发表于 2015-8-2 09:08

臭味胡豆发表于 2015-8-1 23:17
最终达到，无论那天打开这个excel，都会把当天日期的那列高亮出来。谢谢了。

Private Sub Workbook_Open()
Dim rng As Range
With Sheet1
.Cells.Interior.ColorIndex = xlNone
For Each rng In .Range(.Cells(3, 1), .Cells(3, .Cells(3, 256).End(xlToLeft).Column))
If CDate(rng.Value) = Date Then
rng.Interior.ColorIndex = 3
End If
Next
End With
End Sub

复制代码

huang1314wei · 发表于 2015-8-2 09:09

附件供参考

当天列高亮.rar (8.76 KB, 下载次数: 19)

臭味胡豆 · 发表于 2015-8-2 15:33

cqlpjxx 发表于 2015-8-2 08:07
实现方法：1.定义名称co=MATCH(TODAY(),Sheet1!$A$3:$Q$3),得到当天日期所在列标
2.条件格式，公式：colum ...

谢谢，尝试了一下，达到目的。谢谢。

臭味胡豆 · 发表于 2015-8-2 15:41

huang1314wei 发表于 2015-8-2 09:09
附件供参考

谢谢回复。但是有个问题，比如在今天8.2日，修改了该excel进行了保存，那么8.2日的边框也会保存。到8.3日打开的时候，就会出现两列红色边框。

臭味胡豆 · 发表于 2015-8-2 15:46

cqlpjxx 发表于 2015-8-2 08:07
实现方法：1.定义名称co=MATCH(TODAY(),Sheet1!$A$3:$Q$3),得到当天日期所在列标
2.条件格式，公式：colum ...

你说的定义名称，在哪里定义呢？谢谢。请明示。

臭味胡豆 · 发表于 2015-8-2 15:48

臭味胡豆发表于 2015-8-2 15:46
你说的定义名称，在哪里定义呢？谢谢。请明示。

自问自答，因为不知道咋个删除。
插入--定义--名称

		自动登录	找回密码
密码			免费注册

[求助] excel真么设置让符合条件的列仅边框高亮？