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

¿z¿ï°ÝÃD

¦^´_ 1# spermbank
  1. Sub Ex()
  2.     With ActiveSheet
  3.         If Not .AutoFilter Is Nothing Or .FilterMode Then  'FilterMode=True ->¿z¿ï¼Ò¦¡
  4.             .ShowAllData
  5.            ' .Cells.AutoFilter   '¨ú®ø¿z¿ï
  6.         End If
  7.     End With
  8. End Sub
½Æ»s¥N½X

TOP

        ÀR«ä¦Û¦b : µêªÅ¦³ºÉ¡D§ÚÄ@µL½a¡AµoÄ@®e©ö¦æÄ@Ãø¡C
ªð¦^¦Cªí ¤W¤@¥DÃD