“编译错误:预期:列表分隔符或”

时间:2019-07-15 22:31:13

标签: vba worksheet-function

我的vba模块中有以下代码

    For i = 4 To lastOutputCol
        If Sheets("Mort Rates").Cells(1, i).Value Mod 5 = 0 Then
            For x = 2 To lastOutputRow

                Sheets("Mort Rates").Cells(x, i).Value = Application.WorksheetFunction.Index(Sheets("Input").Range(Cells(17,dbPerkCol),Cells(lastInputRow,dbPerkCol+2)) _
                ,Application.WorksheetFunction.Match( Sheets("Mort Rates").Cells(x,2)&Sheets("Mort Rates").Cells(1,i)&Sheets("Mort Rates").Cells(x,3) _
                ,Sheets("Input).Range(Cells(17,1),Cells(lastInputRow,1)),0),1)

            Next x
        End If
    Next i

我收到一个编译错误:“ Expeted:列表分隔符或”。我不确定为什么。

0 个答案:

没有答案