Formule pour cellules

[OliTri]

Re - bonsoir .

une toute petite question qui pour des as comme vous ne risque pas de vous bloquer.


quand je fait :

sheets("feuil1").[a1]=sheets("feuil1").[a1] + sheets("feuil2").[a1]

comment faire pour que dans cette formule , il prend de ma cellule A1 jusque A50 pour ne pas devoir taper la formule 50 ( ce que je fait actuelement ! ) ça doit etre quelque chose comme :

sheets("feuil1").[a1.a50]=sheets("feuil1").[a1.a50] + sheets("feuil2").[a1.a50]

Mais avec le point entre A1 et A50 il ne me prend que et uniquement A1 et A50 .


Aider moi svp j'en ai marre de taper des centaine de formule alor que je "sais le faire" avec une seule .

Merci de pense à mes doigt et à mon clavier .

 

[Creepy]

Salut à tous,

sheets("feuil1").range("a1:a50")

++

Creepy

 

[OliTri]

merci ,

et pour ma formule ou j'additionne , c'est bien comme ça ?

sheets("feuil1").range("a1:a50")=sheets("feuil1").range("a1:a50") + sheets("feuil2").range("a1:a50")


merci pour l'info .

 

[Lord Nelson]

Salut,
Tu pourrais traiter ça en boucle :

Dim I As Integer
For I = 1 To 50
Range("Feuil1!A" & CStr(I)).Value = Range("Feuil1!A" & CStr(I)).Value + Range("Feuil2!A" & CStr(I)).Value
Next

A+
LN