VBA Fonction somme

[vivi4561]

Bonjour,

Dans mon code je souhaite utiliser la fonction somme pour calculer la somme de valeurs négatives et positives.

J'utilise actuellement :

    transportData = Application.Sum(Range("W3:W300"))

La variable me renvoie un nombre qui n'est absolument pas bon (je précise que ma variable est définie en Integer).


Savez vous d'où cela peut-il venir ?


Merci pour votre aide,


Vince

 

[Guest]

Re : VBA Fonction somme

Bonjour,

Peut-être:
Dim transportData As Double

Mais comment savoir?
A+

 

[vivi4561]

Re : VBA Fonction somme

En mettant la variable à Double cela n'a pas d'effet.

Avec la fonction sum, on peut bien additionner des nombres négatifs ?

 

[JCGL]

Re : VBA Fonction somme

Bonjour à tous,

Pour le plaisir de croiser l'ami Ges 🙂🙂

Fichier en pièce jointe

A++
A+ à tous

 

[Guest]

Re : VBA Fonction somme

Re,

Oui
A+
[Edit] Hello JC🙂 tu m'a pris de court.

 

[vivi4561]

Re : VBA Fonction somme

RE,

Ce que tu as fait marche très bien. Moi j'ai appliqué la meme formule mais je pense que le problème vient du fait que j'ai mis un filtre avant de faire la somme.


Faut que je trouve comment faire, pour faire la somme des valeurs de la colonne W quand il y a un filtre.

 

[JCGL]

Re : VBA Fonction somme

Bonjour à tous,

Sans VBA, tu as la fonction SOUS.TOTAL(9;W3:W300)

A+ à tous

 

[david84]

Re : VBA Fonction somme

Bonjour à tous, JC🙂, Hasco🙂,
en VBA : Application.Subtotal(9, Range("W3:W300"))
A+

 

[vivi4561]

Re : VBA Fonction somme

Parfait de chez parfait.

Merci bcp david84, JCGL et Hasco.

 

[clark...kent]

Re : VBA Fonction somme

merci encore un post qui sert toujours un an plus tard