VBA : Références à une autre feuille

Bonjour,

Afin de pouvoir utiliser des variables, je voudrais faire référence à des cellules d’une autre feuille par la ligne

Range("B" & i) = Application.Sum(Worksheets("Feuil2").Range(Cells(21, i), Cells(21 + j - 1, i)))

Malheureusement ça bloque (voir éventuellement mes différents essais dans le fichier ci-joint, avec des commentaires directement dans le code),

Savez-vous comment je peux remédier à ce problème ?

Cordialement.

Bonjour

essaie plutôt comme ceci

With Worksheets("Feuil2")
    For i = 2 To 4
        Range("B" & i) = Application.Sum(.Range(.Cells(21, i), .Cells(21 + j - 1, i)))
    Next i
End With

Amicalement

Bonjour,

je ne sais pas si j'ai répondu à ton besoin....à essayer!

Bonjour Dan,

Pas vu ta réponse, j'ai fait à peu près la même chose!

@Niko,

Merci pour ta réponse mais ce n'est pas tout à fait ce que je désirais. Tu effectues effectivement le calcul sur la feuille 2 - après l'avoir sélectionnée - ce que je ne voudrais pas. En fait ta solution s'apparente à ma macro d'essai Sub yyy ().

@Dan,

Merci à toi également pour ta réponse. Ca résout absolument mon problème

Bonnes salutations à tous deux.