SumIf sur deux feuilles

Question

J'essaie de faire un SumIf où les données sont stockées dans la feuille Sheet6 (dette) et le sumif doit être ajouté à la feuille 5 (Summary - Debt> 12 Months).

Je l'ai déjà rassemblé le nombre de clients unique et les coller dans Col B7: B ###

Le numéros ont lieu à Col B dans la dette, et la colonne à sumIf est DebtH: H

Pour faire cela dans la barre de formule I écrirais: = sumIf (dette B: B, B7, dette H: H)

Voici ce que j'ai jusqu'à présent:

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

Voici la réponse:

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

Answer 2

Essayez d'attribuer votre dernière ligne à tring variable (par exemple sTest) et l'utilisation de la fenêtre immédiate Ctrl + G et le type? sTest

Ce que vous essayez de passer ne sera pas ce que vous pensez qu'il est.

Vous avez besoin de plus de & et de citations de départ.

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