- ©«¤l
- 6
- ¥DÃD
- 3
- ºëµØ
- 0
- ¿n¤À
- 59
- ÂI¦W
- 0
- §@·~¨t²Î
- MIRCOSIOFT
- ³nÅ骩¥»
- XP
- ¾\ŪÅv
- 20
- ©Ê§O
- ¨k
- ¨Ó¦Û
- TAINAI
- µù¥U®É¶¡
- 2015-7-7
- ³Ì«áµn¿ý
- 2024-5-6
|
[µo°Ý] ¨Ï¥ÎVBAµ{¦¡¦Û°Ê³]©w®æ¦¡¤Æ±ø¥óÅܦ¨µLªkÅܦâ
¨Ï¥ÎVBAµ{¦¡¦Û°Ê³]©w®æ¦¡¤Æ±ø¥óÅܦ¨µLªkÅܦâ.
¨Ó·½½d³ò = "$" & "D" & "$" & ¼Æ¦r '±a¤J¦¹ÅܼƳ]©w®æ¦¡¤Æ±ø¥óÅܦ¨µLªkÅܦâ
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:=(¨Ó·½½d³ò) '±a¤J¦¹ÅܼƳ]©w®æ¦¡¤Æ±ø¥óÅܦ¨µLªkÅܦâ
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Font
.Color = -16383844
.TintAndShade = 0
End With
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 13551615
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False
½Ð°Ý¦U¦ì¥ý¶i¬O¨º¸Ì¥X¿ù? ½Ð±z±Ð¾É,ÁÂÁÂ!
쪫®Æ¶q¤º±±ªí.rar (243.24 KB)
|
|