遇到事情要靠自己(2008-10-07 21:00)
哈哈
先小得意哈子。。。
今天西小西解决了一个大难题,在Excel2003中突破条件格式三个的限制,
成功设置了12个条件格式, 根据数值填充单元格的颜色,用的VBA,嘿嘿,其实是在录制的宏的基础上修改实现的。赞!
在逼近成功的时候有一种喜悦,好久没有这样的感觉啦,哈哈
国庆假期里,西小西还学了点VBA,学习VBA先从录制简单的宏开始。
Alt + F8 打开宏
Sub Colour()
‘把单元格内所有值为a的单元格用颜色36填充,值的颜色也为36.
With Application.ReplaceFormat.Font
.Subscript = False
.ColorIndex = 36
End With
Application.ReplaceFormat.Interior.ColorIndex = 36
Cells.Replace What:=”a”, Replacement:=””, LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=True
End Sub
11月 3rd, 2014 at 8:21 上午
网站确实不错,支持一下。
[回复]