Question

我正在尝试在Sheet6（债务）中保存数据的SumIf，并且需要将sumif添加到Sheet5（摘要 - 债务＆gt; 12个月）。

我已收集了唯一的客户编号并将其粘贴到Col B7：B ###

中

客户编号保存在债务中的Col B中，sumif的列是DebtH：H

要在公式栏中执行此操作，我会写：= Sumif（债务！B：B，B7，债务！H：H）

这是我到目前为止所做的：

 Dim lr As Long
  Dim lra As Long
lr = Sheets("Summary - Debt > 12 Months").Cells(Rows.Count, "B").End(xlUp).Row
lra = Sheets("debt").Cells(Rows.Count, "B").End(xlUp).Row
    Sheets("Summary - Debt > 12 Months").Range("H7:h" & lr).Formula = "=SUMif(sheet6!b2:b" & lra,(sheet5!b7:b" & lr),(Sheet6!h2:h" & lra))"

Answer 1

尝试将最后一行分配给字符串变量（比如sTest）并使用立即窗口Ctrl + G并键入？sTest

你想要传递的东西不会是你想象的那样。

您需要更多＆amp;＆s;并开始引用。

Sheets("Summary - Debt > 12 Months").Range("H7:h" & lr).Formula = "=SUMif(sheet6!b2:b" & lra & ",(sheet5!b7:b" & lr & "),(Sheet6!h2:h" & lra & "))"

Answer 2

以下是答案：

    Dim lr As Long
      Dim lra As Long

lr = Sheets("Summary - Debt > 12 Months").Cells(Rows.Count, "B").End(xlUp).Row
    lra = Sheets("debt").Cells(Rows.Count, "B").End(xlUp).Row

Sheets("Summary - Debt > 12 Months").Range("H7:h" & lr).Formula = "=SUMif(Debt!$b$2:$b$" & lra & ",b7,(Debt!$h$2:$h$" & lra & "))"

总结两张纸

2 个答案: