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

[µo°Ý] ¿z¿ï«á¤£·|Åã¥ÜÁôÂÃÄæ¦ì

[µo°Ý] ¿z¿ï«á¤£·|Åã¥ÜÁôÂÃÄæ¦ì

¦³ª¦¹L¤å¡A¦³Ãþ¦üªº°ÝÃD¡A¦ý¬O¦Ñ¹ê»¡¥\¤O¤Ó²L©Ò¥H¬Ý¤£¤jÀ´¡A
¬G·Q¥Îªþ¥ó²³æªºªí³æµo°Ý¡A½Ð¤j¤j­ÌÀ°¦£¸Ñ´b¡AÁÂÁ¡I

ªí¤¤5~8¦C¬°ÁôÂáA¬O§_¥i¥H¦b¿z¿ï«á¤´¤@ª½ºû«ùÁôÂáH
¦A¦¸·PÁ¤j¤j­ÌÀ°¦£¸Ñ´b¡AÁÂÁ¡ã

TEST.rar (3.51 KB)

¦^´_ 2# FAlonso


¯uªº«D±`·PÁ¤j¤jªº¸Ñµª¡A
½Ð°Ý¦³¿ìªkª½±µ§âµ²ªG§e²{¦bAÄæ¶Ü¡H

¤]´N¬O»¡¦b5¡ã8¦C³]¬°ÁôÂ꺪¬ºA¤U¡A§Ú¤Á´«¿z¿ï¥þ³¡µ¥µ¥¡A¥LÁÙ¬O¤£·|¥X²{¦bAÄæ¦ì¸Ì....

·PÁÂ~

TOP

  1. Sub abc()
  2. Range([a2], [a65536].End(xlUp)).SpecialCells(xlCellTypeVisible).Copy
  3. Range("C1").PasteSpecial
  4. End Sub
½Æ»s¥N½X
­nª`·Npaste®É,¤@¨Ç¦r¥À¸¨¦b²Ä4-7 rowªº®É­Ô,»Ý­n§âÁôÂêºrowÅã¥Ü¥X¨Ó
80 ¦r¸`¥H¤º
¤£¤ä«ù¦Û©w¸q Discuz! ¥N½X

TOP

        ÀR«ä¦Û¦b : ¦a¤WºØ¤Fµæ¡A´N¤£©öªø¯ó¡F¤ß¤¤¦³µ½¡A´N¤£©ö¥Í´c¡C
ªð¦^¦Cªí ¤W¤@¥DÃD