如何通过Excel宏找到一列数(800个数)的最小值并确定其位置和注为红色
答案:3 悬赏:0 手机版
解决时间 2021-02-25 09:56
- 提问者网友：玫瑰园
- 2021-02-25 00:07
如何通过Excel宏找到一列数(800个数)的最小值并确定其位置和注为红色
最佳答案
- 五星知识达人网友：山有枢
- 2021-02-25 00:24
Sub Macro() '将A1:A1000区域内最小值所在单元格背景加上红色
For i = 1 To 1000
If Cells(i, 1) = WorksheetFunction.Min(Range("a1:a1000")) Then
Cells(i, 1).Interior.ColorIndex = 3
End If
Next i
End Sub
For i = 1 To 1000
If Cells(i, 1) = WorksheetFunction.Min(Range("a1:a1000")) Then
Cells(i, 1).Interior.ColorIndex = 3
End If
Next i
End Sub
全部回答
- 1楼网友：西岸风
- 2021-02-25 03:00
用突出显示功能就可以了。
再看看别人怎么说的。
- 2楼网友：独钓一江月
- 2021-02-25 01:52
SUB TEST()
Dim i As long
j = Application.MIN(range("A:A"))
for i = 1 to [a65536].end(3).row
if range("a" & i)= j Then
range("a" & i).font.color=-16776961
End If
next
end sub
假设你的数据在A列
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯