编译错误“找不到命名参数" [英] Compile error 'named argument not found'

问题描述

Excel 2007

Excel 2007

Sub Filtered_data_on_othersheet()
    Dim i As Integer
    Dim xx As String

    For i = 1 To 3
        On Error Resume Next
        xx = Sheets("main").Range("K" & i).Value
        Range("A1").CurrentRegion.AutoFilter field:=1, Criterial:=xx
        Range("A1").CurrentRegion.Cells.SpecialCells(xlCellTypeConstants).Copy Destination:=Sheets(xx).Range("A1")

    Next
    Err.Clear
    Range("A1").CurrentRegion.AutoFilter
End Sub

推荐答案

简单的错误.应该是Criteria1而不是Criterial

Simple mistake. It should be Criteria1 not Criterial

使用数字1代替字母l.

这篇关于编译错误“找不到命名参数"的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！