V中班课前必做题：找唯一

covsan · 发表于 2008-8-27 18:01

Sub test() Dim mrg As Range For Each mrg In Range("A1:A200") If Application.WorksheetFunction.CountIf(Range("a1:a200"), mrg) <= 1 Then   mrg.Interior.ColorIndex = 6   mrg.Font.ColorIndex = 5 End If NextEnd Sub

aci123 · 发表于 2008-8-30 19:24

直接看答案

tanghaowei · 发表于 2008-8-30 21:24

学习

zouyuejian · 发表于 2008-10-2 22:59

have a look

东南西北 · 发表于 2008-10-4 14:35

学习一下

东南西北 · 发表于 2008-10-4 14:36

太难了,看不懂[em04][em06]

chenhui1985 · 发表于 2008-12-11 14:16

kankan

ullyses · 发表于 2009-8-15 21:55

好像很难，学习一下的说

WatchSnow · 发表于 2013-2-13 21:47

学习学习,不错不错

laoau125 · 发表于 2015-6-23 17:19

86955656

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

V中班课前必做题：找唯一

浏览过的版块