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

[µo°Ý] ¨Ï¥Î±ø¥ó¦Û°Ê¿z¿ï«á½d³ò¿ï¨úªº°ÝÃD!

¦^´_ 1# yuch8663
­ì¥»´N¨S¦³¸Ó°Ñ¼Æ¡A·íµM·|¿ù¡C
  1. Range.AutoFilter ¤èªk

  2. »yªk
  3. ¹Bºâ¦¡.AutoFilter(Field, Criteria1, Operator, Criteria2, VisibleDropDown)
  4. ¹Bºâ¦¡   ·|¶Ç¦^ Range ª«¥óªº¹Bºâ¦¡¡C
½Æ»s¥N½X

TOP

¥»©«³Ì«á¥Ñ stillfish00 ©ó 2013-9-27 15:36 ½s¿è

¦^´_ 4# yuch8663
«á¥|¦æ§ï¬°
  1. With Sheets("¤À¿ý")
  2.     .Range(.[A4].Offset(1, 0), .[r65535].End(xlUp)).Copy
  3. End With
½Æ»s¥N½X
ºÉ¶q¤Ö¥Îselect¡A¥B¦]¬°§Acode¬O©ñ¦b"¿z¿ï¸ê®Æ®w"ªº¤u§@ªí¡A¦³¥Î¨ìªº¸Ü­n¯S§Oª`·N§Aªº "Range"¬OÄÝ©ó­þ­ÓSheet

TOP

        ÀR«ä¦Û¦b : §ïÅܦۤv¬O¦Û±Ï¡A¼vÅT§O¤H¬O±Ï¤H¡C
ªð¦^¦Cªí ¤W¤@¥DÃD