返回列表 上一主題 發帖

[發問] 篩選問題

可用advanced filter

criteria range看下面
2012年 2013年
<> 0    = 0
= 0      <> 0
> 0      > 0

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
複製代碼

TOP

回復 3# yliu

criteria range即E1:E4寫下這個, 注意= 0要這樣寫="= 0"
2012年 2013年
<> 0    = 0
= 0      <> 0
> 0      > 0

TOP

        靜思自在 : 受人點水之恩,須當湧泉以報。
返回列表 上一主題