columns(" A:A ")interior . pattern?=?xlNone
為了什麽?我?=?1?去哪?[a65536]。結束(3)。排
k?=?1
如果?細胞(我,?1)?& lt& gt?""?然後
r1?=?細胞(我,?1).排
做什麽?直到?細胞(我?+?k,?1)?=?""
k?=?k?+?1
環
設置?Rng?=?範圍(單元格(即,1),?細胞(我?+?k?-?1,?1))
麥克斯。=?申請。最大(Rng)
敏?=?申請。最小(Rng)
r2?=?我?+?申請。匹配(最小,?Rng,?0)?-?1
r3?=?我?+?申請。匹配(最大值,Rng,?0)?-?1
細胞(r2,1)內飾.顏色?=?65535
細胞(r3,1)內飾.顏色?=?5287936
我?=?我?+?k?-?1
結束?如果
然後
結束?Sub上面的代碼只能完成顏色標註的最大值和最小值。至於最大值和最小值的取值,我不知道妳想把結果放在哪裏,所以不懂。