应用程序定义或对象定义的错误:VBA:sumifs公式

时间:2018-06-19 21:28:10

标签: vba sumifs

我无法更正此代码。它在我使用sumifs公式的行中引发错误。这怎么了

Sub try()   
Dim Arg1 As Range   
Dim Arg2 As Range   
Dim Arg3 As Range   
Dim Arg4 As Range   



Set Arg1 = Sheets("Raw Data_All Products").Range("O:O")   
Set Arg2 = Sheets("Raw Data_All Products").Range("J:J")   
Set Arg3 = Sheets("Raw Data_All Products").Range("B:B")   
Set Arg4 = Sheets("Raw Data_All Products").Range("A:A")   

Sheets("Sheet2").Cells(12, c).Value = 
Application.WorksheetFunction.SumIfs(Arg1, Arg2, "SM Parcels", Arg3, "2015", 
Arg4, "1")


End Sub

1 个答案:

答案 0 :(得分:1)

  

问题行:Sheets(“ Sheet2”)。单元格(12,c) .Value =

Cells对象存在语法问题。正确的语法是Cells(Row Index, Col Index),其中index是数字(或用引号括起来的col字母)。

行索引是不言自明的(1 = 1)。
列索引A = 1B = 2C = 3A = "A"B = "B"C = "C"


如果您的目标是在单元格SUMIF中显示C12值,则可以尝试以下三种相同的选择。

1) Sheets("Sheet2").Cells(12, "C").Value =
2) Sheets("Sheet2").Cells(12, 3).Value =
3) Sheets("Sheet2").Range("C12").Value =