[VBA-E]- Recuperer le resultat d'une somme dans une variable

Bonjour,
J'aimerai juste pouvoir stocker dans une variable la somme d'une colonne.
J'utilise par la suite la valeur de cette variable.
J'ai teste ca mais ca ne marche pas.

Code:

---

1 2 3 4 5 6

Sub sommetest() Dim Lasomme As Integer   Lasomme = Sum("B:B") Range("A1").Select = Lasomme End Sub

---

Merci d'avance.

Bonsoir à tous
Bonsoir ekynoxx

Essaie ceci :

Code:

---

1 2 3 4 5 6 7 8

Sub sommetest() Dim Lasomme As Integer Dim maplage As Range Set maplage = Range("b:b") Lasomme = Application.WorksheetFunction.Sum(maplage) Range("A1").Value = Lasomme End Sub

---

Eric

Salut,
Je viens de tester le code, cela ne fonctionne pas.
Le message d'erreur est le suivant :
Unable to get the sum property of the worksheet function class.

J'ai vu un code sur le net ou il rajoute le nom de la sheet mais il marche pas non plus.
J'ai le meme message d'erreur.
Le pb vient du fait que parfois je tombe sur du texte sur la colonne.

salut
pourquoi tu ne fais pas une boucle toute simple au lieux d'utiliser les fonctions?

Code:

---

1 2 3 4 5 6 7 8

Sub addition() findecolone = Range("b1").End(xlDown).Row colonne = Range("b1:b" & findecolone) For Each valeur In colonne résultat = résultat + valeur Next valeur MsgBox résultat End Sub

---

c'est plus simple a utiliser si tu n'a besoin du résultat que comme variable

Bonsoir à tous

Je viens de réessayer cela fonctionne chez moi. J'ai excel 2000 et toi ?

Pour la boucle, c'est bien, mais s'il y a 50000 lignes, on peut aller prendre un thé en attendant (lol)

Eric

même pas une demiseconde pour 65000 lignes

c'était juste un clin d'oeil

Eric

Merci bien pour votre aide cela fonctionne parfaitement.