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

½Ð°Ý ¤j¤j

½Ð°Ý ¤j¤j

¥»©«³Ì«á¥Ñ GBKEE ©ó 2011-3-27 09:20 ½s¿è

¦p±z©Ò»¡ªº¿z¿ï

01.Sub Ex()

02.    Sheets("Sheet3").[A1].CurrentRegion = ""

03.    Sheets("¸ê®Æªí").Range("A1").CurrentRegion.AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("ªí®æ").[K1:L2], CopyToRange:=Sheets("Sheet3").[A1]

04.End Sub

¦pªG­n­×§ï¦¨
¦W¦r¬° ¸ê®Æ®w ªºEXCELÀɮ׸̭±ªº ¸ê®Æªí ¤u§@ªí ¿z¿ïµ²ªG¨ì ¦W¦r¬° µ²ªG ªº EXCELÀɮ׸̭±ªº¿z¿ï«á ¤u§@ªí
­n«ç»ò­×§ï©O
¸É¥R¤@¤U ÀÉ®×¥þ³£©ñ¦bF: ¼Ñ¸Ì­±
³Â·Ð GBKEE ¤j¤j¤F

        ÀR«ä¦Û¦b : ¸Ü¦h¤£¦p¸Ü¤Ö¡A¸Ü¤Ö¤£¦p¸Ü¦n¡C
ªð¦^¦Cªí ¤W¤@¥DÃD