| 楼主 hlxz |
 附件：  闪烁水星钓鱼.rar |
| 2楼 罗刚君 |
IF语句可以精简一下 If Range("A1").Font.ColorIndex = 2 Then Range("A1").Font.ColorIndex = xlColorIndexAutomatic Else Range("A1").Font.ColorIndex = 2 End If 精减为一句 Range("A1").Font.ColorIndex = Range("A1").Font.ColorIndex + IIf(Range("A1").Font.ColorIndex = 1, 1, -1) |
| 3楼 hlxz |
就不精简就不精简就不精简 |
| 4楼 fanti@126.com |
小女人心态 |
| 5楼 fraway |
这样都行阿。。。。 |