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

[µo°Ý] ½Ð±Ð¦¹¥¨¶°­n¦p¦ó¼g ?

¦^´_ 1# t8899


    ­Ë¼Æ²Ä¤@µ§¤£µ¥©óªÅ¥Õªº­È¡A«üªº¬O³Ì«á¤@µ§¦³¸ê®Æªº­È¶Ü¡H
    ¦pªG¬Oªº¸Ü¡G
  1. sub test
  2. For Each rng In [E20:E200]
  3. If rng <> "" Then [a1] = rng.Value
  4. Next
  5. end sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¤£©È¨Æ¦h¡A¥u©È¦h¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD