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

½Æ»s®É~ ¥u±a­È¤£­n®æ¦¡

¦^´_ 1# hugh0620
¤£¥Î COPY  ®ÄªG¤@¼Ë
  1. Sub Ex()
  2.     With Sheet1.Range("K4")
  3.         Sheet1.Range("E4").End(xlDown).Offset(1, 0) = .Value
  4.     End With
  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ÁÀ¨¥¹³¤@¦·²±¶}ªºÂAªá¡A¥~ªí¬üÄR¡A¥Í©Rµu¼È¡C
ªð¦^¦Cªí ¤W¤@¥DÃD