- ©«¤l
- 30
- ¥DÃD
- 4
- ºëµØ
- 0
- ¿n¤À
- 34
- ÂI¦W
- 0
- §@·~¨t²Î
- win 8
- ³nÅ骩¥»
- office2010
- ¾\ŪÅv
- 10
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2020-12-9
- ³Ì«áµn¿ý
- 2021-4-5
|
¦^´_ 4# ã´£³¡ªL
¥ýÁÂÁÂÀ°¦£¡A¦ý¦³°ÝÃD·Q½Ð±Ð¤@¡A´N¬O¦pªG¥Î³oÓ¿z¿ï¥X¨Óªº¸ê®Æ¡A¯àµ¹¥X©T©wÄæ¶Ü?
§Ú¸Õ¤F¦n´X¤Ñ¤]¥u¯à°µ¨ì§â¿z¿ï¥X¨Óªº¸ê®Æ¦b¶K¤Wªº®ÉÔ¦V¤U²¾¼Æ¦æ©Î¥k²¾¼ÆÄæ¤~¶K¤W¡A´N¬O¤£¯à¦¬¯¶½Æ»sªºÄæ¼Æ
¥u»Ýn30Äæ¡A¦ý«ç¼Ë¤]§ï¤£¨ì¡A§Æ±æ¯à°÷À°¦£¡AÁÂÁÂ
,
If .FilterMode Then .ShowAllData
.[b7].AutoFilter Field:=2, Criteria1:=xS.[j2]
.AutoFilter.Range.Offset(1, 2).Copy xS.Cells(Rows.Count, 1).End(xlUp)(2)
.ShowAllData |
|