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

[µo°Ý] ¿z¿ï¼Æ¾Ú°ÝÃD

¥»©«³Ì«á¥Ñ GBKEE ©ó 2012-6-27 09:06 ½s¿è

¦^´_ 1# spermbank
±Æ§Ç ¥i¿ý»s¥¨¶°½m²ß
  1. Option Explicit
  2. Sub Ex()
  3.     Range("A1").AutoFilter Field:=2, Criteria1:=">=" & Date + 3, Operator:=xlAnd, Criteria2:="<=" & Date + 20
  4.     'AutoFilter ¦Û°Ê¿z¿ï  '²Ä¤G­ÓÄæ¦ì, ·Ç«h1     = ±ø¥ó          , 'xlAnd¥B xlOr ©Î , ·Ç«h2   = ±ø¥ó
  5. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : ¯u¥¿ªº·R¤ß¡A¬O·ÓÅU¦n¦Û¤vªº³oÁû¤ß¡C
ªð¦^¦Cªí ¤W¤@¥DÃD