Sumif 公式,當我嘗試使用作業表時,它似乎不起作用,它只是給了我沒有任何作業表的代碼
Dim rCritera As Range
Dim rCriteriaRange As Range
Dim rSum As Range
Dim rFormula As Range
Set rCriteriaRange = Wb.Sheets("Change").Range("A:A")
Set rCritera = Wb.Sheets("Waterfall").Range(ActiveCell.Address).Offset(0, -9)
Set rSum = Wb.Sheets("Change").Range("M:M")
Set rFormula = ActiveCell
rFormula.Formula = "=SumIf(" & rCriteriaRange.Address(1, 1) & "," & rCritera.Address(0, 0) & "," & rSum.Address(0, 0) & ")"
uj5u.com熱心網友回復:
ActiveCell考慮到您正在使用和跨作業表作業,我有點困惑。您正在尋找什么以及它存在的位置并不是 100% 清楚......我認為這就是你需要的......
rFormula.Formula = "=SumIf('Change'!" & rCriteriaRange.Address & "," & rCritera.Address & ",'Change'!" & rSum.Address & ")"
uj5u.com熱心網友回復:
rFormula.Formula = "=SumIf(Change!" & rCriteriaRange.Address(1, 1) & "," & rCritera.Address(0, 0) & ",Change!" & rSum.Address(0, 0) & ")"
轉載請註明出處,本文鏈接:https://www.uj5u.com/caozuo/411972.html
標籤:
上一篇:使用wordVBA在word檔案中添加頁面時如何禁用microsoftoffice潛在的安全問題
下一篇:我怎樣才能使一個范圍的平均值?
