首先谢谢 swl4561255， 再问：Excel 用函数或宏实现自动填充颜色，声明不用菜单里面

lzdbiam

这是不是一种需要通配符或者加上其它关系呢，比如说在“分类号”列中只要出现“H04”或“G01”或“N5”我就把整行标上红色呢？
谢谢大家了！

专利名称

申请人

分类号

一种处理X线平板探测器图像坏线的方法及其装置	深圳迈瑞生物医疗电子股份有限公司	'H04N5/14(2006.01)I;H04N5/202(2006.01)I;G01N23/04(2006.01)I;G01V3/12(2006.01)I
插座连接器及具有该插座连接器的电子设备	深圳迈瑞生物医疗电子股份有限公司	'H01R13/70(2006.01)I;H01R13/707(2006.01)I
麻醉蒸发器及温度补偿单元	深圳迈瑞生物医疗电子股份有限公司	'A61M16/18(2006.01)I;A61M16/01(2006.01)I
医疗设备集成装置及系统	深圳迈瑞生物医疗电子股份有限公司	'A61B19/00(2006.01)I;A61M16/00(2006.01)I;A61M5/142(2006.01)I
血压测量间隔控制方法、装置及监护仪	深圳迈瑞生物医疗电子股份有限公司	'A61B5/0225(2006.01)I

swl4561255

1. Private Sub CommandButton1_Click()
   
2. ar = [C65536].End(3).Row
   
3. For i = 1 To ar
   
4. If Cells(i, 3) Like "*G01*" Or Cells(i, 3) Like "*N5*" Then
   
5. Range(Cells(i, 1), Cells(i, 3)).Interior.ColorIndex = 3
   
6. End If
   
7. Next
   
8. End Sub

复制代码

mengxiangzaifei

楼上强大，新手膜拜。

lzdbiam

佩服，想不出更好的办法了，谢谢！！！！！！！！！！！！！！！！！！！{:soso_e183:}

xiaoli66

同意一下。