EXCEL VBA公式錯誤與工作表參考

Question

有人可以找出錯誤的位置嗎？

Sub calc_external_sales() 
    Sheets("Monetary All").[C5].Formula = "=SUMMEWENNS(Rawdata!K2:K3446;Rawdata!I2:I3446;""bezahlt"")" 
End Sub 

我想它與表單和範圍有關。

Answer 1

也許

Sub calc_external_sales() 
    Sheets("Monetary All").[C5].Formula = "=SUMIF(Rawdata!K2:K3446,Rawdata!I2:I3446,""bezahlt"")" 
End Sub 

或

Sub calc_external_sales() 
    Sheets("Monetary All").[C5].FormulaLocal = "=SUMMEWENNS(Rawdata!K2:K3446;Rawdata!I2:I3446;""bezahlt"")" 
End Sub 

Answer 2

的問題是，當您使用在你的搜索條件的引號（「bezahlt」），它有效地把它當作兩個字符串是彼此相鄰而沒有連接。改爲：

Sub calc_external_sales() 
    Sheets("Monetary All").[C5].Formula = "=SUMMEWENNS(Rawdata!K2:K3446,Rawdata!I2:I3446," & Chr(34) & "bezahlt" & Chr(34) & ")" 
End Sub 

chr（34）是引號的符號。