ªð¦^¦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 : ¡i®É¶¡¦¨´N¤@¤Á¡j®É¶¡¥i¥H³y´N¤H®æ¡A¥i¥H¦¨´N¨Æ·~¡A¤]¥i¥HÀx¿n¥\¼w¡C
ªð¦^¦Cªí ¤W¤@¥DÃD