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

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

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

½Ð°Ý¦p¦ó¥Î¿z¿ï¤è¦¡±N¤G­ÓÄæ¦ìªº­È¦P®É¬O0¤£Åã¥Ü?
¤U­±¼gªk,¿z¿ï«á,µ²ªG¥u³Ñ¤U¤G­ÓÄæ¦ìªº­È¦P®É>0, ³o¤£¬O§Ú­nªºµ²ªG.
§Æ±æ¿z¿ï«áªºµ²ªG¦p¹Ï¤@.


¿z¿ï°ÝÃD.zip (10.16 KB)

Private Sub CommandButton1_Click()
With Sheets("sheet1")
  .AutoFilterMode = False
With .Range("A4:C9")
  .AutoFilter
  .AutoFilter field:=2, Criteria1:="<>0"
  .AutoFilter field:=3, Criteria1:="<>0"
   
End With
End With

End Sub
learner

¥i¥Îadvanced filter

criteria range¬Ý¤U­±
2012¦~ 2013¦~
<> 0    = 0
= 0      <> 0
> 0      > 0

TOP

¦^´_ 2# genes
½Ð°Ý»yªk¸Ó¦p¦ó¼g?
¬Ý¤F»¡©ú, ¸Õ¹L¤F¤@ª½³£µLªk¦¨¥\.
learner

TOP

¦^´_ 3# yliu
  1. Sub customfilt()
  2. With ActiveSheet
  3. .Range("B1:C6").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range _
  4.         ("E1:F4"), CopyToRange:=.Range("G1"), Unique:=False
  5. End With
  6. End Sub
½Æ»s¥N½X

TOP

¦^´_ 3# yliu

criteria range§YE1:E4¼g¤U³o­Ó, ª`·N= 0­n³o¼Ë¼g="= 0"
2012¦~ 2013¦~
<> 0    = 0
= 0      <> 0
> 0      > 0

TOP

¦^´_ 5# genes

§ï¼g¦p¤U, ¦ý¥X²{"°õ¦æ¶¥¬q¿ù»~1004" °Ñ·ÓµL®Ä , ½Ð°Ý»yªk­þ¸Ì¿ù¤F? (¤£COPY ¨ì§OªºÀx¦s®æ, ¦b­ì¦ì¸m¶i¦æ¿z¿ï)
  
Private Sub CommandButton1_Click()
With Sheets("sheet1")
.AutoFilterMode = False
   With .Range("B4:C9")
    .AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:="<>0"
    End With
    End With
End With
End Sub
learner

TOP

¦^´_ 6# yliu

TOP

¦^´_ 7# c_c_lai
ÁÂÁ§A, ¤w¸Ñ¨M.
learner

TOP

¦^´_ 6# yliu
  1. Private Sub CommandButton1_Click()
  2.     With Sheets("sheet1")
  3.         .Range("A4").CurrentRegion.AdvancedFilter xlFilterInPlace, .Range("F1:F2") ',¨ä¥L¦ì¸m
  4.         '.Range("F1:F2")   ¦Û°Ê¿z¿ïªº·Ç«h¦ì¸m
  5.         'xlFilterInPlace   °Ñ¼Æ­È = 1  ¦b¸ê®Æ®wÅã¥Ü¿z¿ïªº¸ê®Æ
  6.         'xlFilterCopy      °Ñ¼Æ­È = 2  ¦b¨ä¥L¦ì¸mÅã¥Ü¿z¿ïªº¸ê®Æ
  7.     End With
  8. End Sub
½Æ»s¥N½X

EX.JPG (71.15 KB)

EX.JPG

·P®¦ªº¤ß......(¦b³Â»¶®a±Ú°Q½×°Ï.¥Î¤ß¾Ç²ß·|¦³¶i¨Bªº)
¦ý¸ê·½µL­­,«á´©¦³­­,  ¤@¤Ñ1¤¸ªºÃÙ§U,¤H¤H¦³¯à¤O.

TOP

¦^´_ 8# yliu
#9 ¼Ó GBKEE ª©¤jªºÀ³¥Î¤èªkÆZ­È±o±ÀÂ˪º¡A²¼ä§ã­n¡I
¿z¿ï±ø¥ó¥u­n²Å¦X =OR(B5<>0,C5<>0) «K¦¨¥ß¤F¡C

TOP

        ÀR«ä¦Û¦b : ¦³´¼¼z¤~¯à¤À¿ëµ½´c¨¸¥¿¡F¦³Á¾µê¤~¯à«Ø¥ß¬üº¡¤H¥Í¡C
ªð¦^¦Cªí ¤W¤@¥DÃD