ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

½Ð°Ý¥u­n¦b³æ¼ÆÀx®æ1,3,5.¡K51¼g¤J

Step 2¤Ó¦n¥Î¤F
§Ú¤U­±ªºµ{¦¡¡A¤£¤Ó¦n¥Î¡A·|¸õ°Ê¼v¹õ¡A¦p¦ó§ïµ½¡K¡H


Sub a1()
    For x = 1 To 800 ...
¦Û§Ú·Pı¨}¦n µoªí©ó 2013-2-20 11:55




Application.DisplayAlerts = False'´£¥Ü°T®§®ø°£
Application.ScreenUpdating = False    '¿Ã¹õ§ó·s®ø°£

­Y¨Ï¥Î  Application.ScreenUpdating = False    '¿Ã¹õ§ó·s®ø°£
µ{¦¡«á­±¥²¶·±N¨ä¶}±Ò
Application.ScreenUpdating = True   '¿Ã¹õ§ó·s¶}¤ß

  ¦h°µ¦h·Q¦h¾Ç²ß¡A¤Ö¬Ý¤Ö¿ù¤Ö°g³~

  ¦h°µ=¦h¦h½m²ß¡A¦h¦h½s¼g¡C
  ¦h·Q=·Q·Q¬°¤°»ò¤H®aµ{¦¡­n¨º¼Ë¼g¡A¦pªG´«¦¨¦Û¤v¡A¤S·|«ç¼g¡C
  ¦h¾Ç²ß=¾Ç²ß¤H®aªºµo°Ý¨Ã¸Ñµª¡A¾Ç²ß¤H®aªº¼gªk

  ¤Ö¬Ý=¥u¬Ý¤£°µ¤]ªPµM

TOP

        ÀR«ä¦Û¦b : ­ì½Ì§O¤H´N¬Oµ½«Ý¦Û¤v¡C
ªð¦^¦Cªí ¤W¤@¥DÃD