- ©«¤l
- 45
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 51
- ÂI¦W
- 0
- §@·~¨t²Î
- windows 7
- ³nÅ骩¥»
- office 2003
- ¾\ŪÅv
- 20
- µù¥U®É¶¡
- 2013-4-16
- ³Ì«áµn¿ý
- 2013-12-30
|
¦^´_ 4# HCG10G8bear
¦pªG®æ¬O¶À¦â,®æªº¼ÆÈ¬O1- Sub Macro1()
- With ActiveSheet
- If Selection.Interior.ColorIndex = 6 Then
- Selection.Value = 1
- End If
- End With
- End Sub
½Æ»s¥N½X |
|