Somme fin de colonne

[Ken Hutchinson]

Re-hello,

En colonne B, de longueur variable, a la première cellule vide, je voudrais faire la somme de toutes les cellules au dessus...

merdci de votre aide.

 

[LPandre]

Re : Somme fin de colonne

Bonjour

essaie ceci dans un code macro:


Dim L As Integer
L = Range("B65536").End(xlUp).Row
Range("B" & L + 1) = Evaluate("sum(B1:M" & L & ")")

Cordialement

 

[TheLio]

Re : Somme fin de colonne

Hello,
Quelquechose comme ça?

=SOMME.SI(B:B;">0")
ou quelque chose de plus complexe?
A++
TheLio

 

[Ken Hutchinson]

Re : Somme fin de colonne

La formule de LPandre fonctionne... mais la somme ne doit se faire que sur la colonne B et non tout le tableau...

 

[LPandre]

Re : Somme fin de colonne

Re :
oups !!
correction :


Dim L As Integer
L = Range("B65536").End(xlUp).Row
Range("B" & L + 1) = Evaluate("sum(B1:B" & L & ")")

@+

 

[Ken Hutchinson]

Re : Somme fin de colonne

IMPEC !!!

ça fonctionne très bien !