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

[µo°Ý] ¿z¿ï°ÝÃD

¦^´_ 1# spermbank
§A©Ò»¡ªº
ActiveSheet.Range("$A$1:$CE$" & x).AutoFilter Field:=7, Criteria1:=">=1",Operator:=xlOr, Criteria2:="=¥þ"
³o¸ÌªºField:=7«üªº¬O¹ïGÄæ¿z¿ï¡A¤]´N¬O¿z¥X GÄæ¤j©óµ¥©ó1 ©Î¬O GÄæµ¥©ó"¥þ"¡C
¨Ã¤£¬O§A»¡ªº"¿z¿ï¥XX¦C¤j©óµ¥©ó1ªº­È©ÎY¦Cµ¥©ó¥þªº­È"

¹ïAutoFilter¨Ó»¡¡A¦P¤@Äæªº¿z¿ï±ø¥ó¥u¯à¨â­Ó¡A¦ý¬O¥¦¤]¯à¦P®É¹ï«Ü¦hÄæ¿z¿ï¡A¤£¾å±o§A­nªº¿z¿ï¥\¯à¨ì©³¬°¦ó¡C

TOP

        ÀR«ä¦Û¦b : ¨Ã«D¦³¿ú¾{¬O§Ö¼Ö¡A°Ý¤ßµL·\¤ß³Ì¦w¡C
ªð¦^¦Cªí ¤W¤@¥DÃD