¦p¦ó¥ÎEXCEL¨ç¼Æ Åý¥¦ªí¹F¥XþÓ¼ÆÈ³Ì±µªñ ¬Y©T©wÈ
- ©«¤l
- 93
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 134
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOWS7
- ³nÅ骩¥»
- OFFICE 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2016-3-21
- ³Ì«áµn¿ý
- 2025-5-30
|
¦bE4¦æ¶}©l°_¦h¤@Ó =ABS(D4-D$2) ©Ô¤U¥h
µM«á®æ¦¡¤Æ±ø¥ó¥Î¤½¦¡ =RANK($E4,$E$4 E$10,1)=1 ®M¥Î¨ì=$C$4 C$500
VBAªº¸Ü´N
Public Sub 钡()
k = Abs(Cells(4, 4) - Cells(2, 4))
For i = 4 To 500
a = Abs(Cells(i, 4) - Cells(2, 4))
If a < k Then
k = a
c = i
End If
Next
Cells(c, 3).Interior.ColorIndex = 6
End Sub |
|
|
|
|
|
|
- ©«¤l
- 93
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 134
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOWS7
- ³nÅ骩¥»
- OFFICE 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2016-3-21
- ³Ì«áµn¿ý
- 2025-5-30
|
¦^´_ 2# fengetianxia
ªí±¡¬O": $" |
|
|
|
|
|
|
- ©«¤l
- 93
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 134
- ÂI¦W
- 0
- §@·~¨t²Î
- WINDOWS7
- ³nÅ骩¥»
- OFFICE 2010
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- µù¥U®É¶¡
- 2016-3-21
- ³Ì«áµn¿ý
- 2025-5-30
|
¦^´_ 4# ML089
¬Omin
ì¨Ó®æ¦¡¤Æªº¤½¦¡¥i¥Hª½±µ¥Î¼Æ²Õ¤½¦¡.¨ü±Ð¤F |
|
|
|
|
|
|