Somme en Vba

SylvainPG

XLDnaute Nouveau
Salut,

Voila, j'ai un petit problème. Je souhaite faire en VBA une somme. J'ai un tableau excel avec en première colonne un numéro de cuve et ensuite tout un tas de valeur.Il me faut faire un produit de la cellule 10 avec la cellule 12 de chaque cuve et de sommer tous ces résultats.Voilà mon programme.Je suis ultra débutant en vba, je suis en fait mécanicien et je ne suis pas à mon aise sur ce type d'exercice. Merci d'avance pour vos réponses :)


Function b() As Double
Dim i As Integer
Dim a As Double

b = ""
With worksheets("cuves")

For i = 2 To 100
a = (cells(i, 12)) * (cells(i, 10))
b = b * a
Next i

End With

End Function
 

wilfried_42

XLDnaute Barbatruc
Re : Somme en Vba

Bonjour et bienvenue

un formule est plus rapide et plus simple qu'une fonction persnalisée en VBA

il faut nommer les colonnes concernées : Menu insertion / Nom / Definir

Cuve nom de la colonne des n° de cuve
col10 : nom de la colonne 10
col12 : nom de la colonne 12

=SommeProd((cuve="Sonnumero")*(col10*col12))

Si tu avais joint un petit fichier sans donnée confidentielle <= 48,8 Ko en format Zip, ca aurait ete plus simple
 

SylvainPG

XLDnaute Nouveau
Re : Somme en Vba

Merci de ta réponse,

Mais le nombre de cuve n'est pas toujours le même et peut varié énormément.Ce programme doit être capable d'exécuter le calcul d'une façon général. Il me semble que la formule sommeprod ne sois pas appropriée. Je voulais que pour la premiere cuve, il calcul le produit en question, ensuite il l'ajoute au produit de la deuxième cuve, ensuite à la troisième et ainsi de suite...jusque n cuves.

>en tout cas merci pour le sommeprod ça me servira à un autre endroit :)

Sylvain
 

Statistiques des forums

Discussions
312 196
Messages
2 086 102
Membres
103 117
dernier inscrit
augustin.morille