- ©«¤l
 - 1572 
 - ¥DÃD
 - 16 
 - ºëµØ
 - 2 
 - ¿n¤À
 - 1521 
 - ÂI¦W
 - 0  
 - §@·~¨t²Î
 - xp 
 - ³nÅ骩¥»
 - office 2003 
 - ¾\ŪÅv
 - 150 
 - ©Ê§O
 - ¨k 
 - µù¥U®É¶¡
 - 2010-5-1 
 - ³Ì«áµn¿ý
 - 2016-1-13 
 
   
 | 
                
[i=s] ¥»©«³Ì«á¥Ñ oobird ©ó 2013-10-9 20:36 ½s¿è [/i] 
 
¤èªk¦³³\¦h¡AÁ|¤@¨Ò¡G 
Sub test1() 
 
Range("A1:D10") = Evaluate("A1:D10" & "/100") 
 
Range("A1:D10").Replace ".*", "", xlPart 
  
End Sub |   
 
 
 
 |