VBA中的Countif函数无法正常工作

时间:2018-09-30 04:19:59

标签: excel vba

我有一个范围,我需要按第一列中的ID号进行过滤,然后检查下一列是否包含“ T”或“ H”的实体类型,因此我在上写了这样的代码如果我运行代码,countif行会给出1004的错误

请帮助我哪里出错了

MyRange.Columns(1).Offset(1, 0).Copy
Range("R21").PasteSpecial (xlPasteValues)
Selection.RemoveDuplicates (1)

For Each jn In Selection
    MyRange.AutoFilter field:=1, Criteria1:=jn

    If WorksheetFunction.CountIf(MyRange.Columns(2).SpecialCells(xlCellTypeVisible), "T") <> 0 Then
 MyRange.SpecialCells(xlCellTypeVisible).Copy

End if

0 个答案:

没有答案