SumIf跨兩張

我試圖做一個SumIf數據在Sheet6（債務）和Sumif需要被添加到Sheet5（總結 - 債務> 12個月）的地方。SumIf跨兩張

我已經聚集唯一的客戶編號和粘貼他們到山口B7：乙###

的客戶數量在色柱B的債務舉行，並SUMIF列是DebtH：H

要在公式編輯欄中爲此，我會寫：= SUMIF（債務！B：B，B7，債務H：1 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))"

來源

2016-11-17 J.Zentner

下面是答案：

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 & "))"

來源

2016-11-17 13:45:49

嘗試分配你的最後行爲tring變量（比如sTest）和使用即時窗口Ctrl + G並鍵入？sTest

你試圖通過的將不會是你的想法。

您需要更多&的和起始引號。

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

來源

2016-11-17 13:22:20 Rdster

嗨，仍然沒有工作。結果是= SUMIF（Sheet6！B2：B8670，（B7），（Sheet6！H2：H8670））。該工作簿沒有名爲Sheet6的工作表，而是Debt ... –

然後，這就是您的問題的一部分...您的代碼表sheet6 – Rdster

@Rdster PO使用Sheet6作爲工作簿中的工作表索引。他實際上是指名爲'Debt'的工作表（再次閱讀他的文章）。只需在你的答案中將'sheet'修改爲'Debt'，它就可以工作。並且'Sheet5'到'Summary - Debt> 12 Months' –

回答

相關問題