Vba et sommes et if

01delph75 Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -  
01delph75 Messages postés 7 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

comment faire quand je dois ajouter deux if et faire une somme par la suite... je cherche que si les cellules d'une feuille est égale à la première cellule de l'autre et que si c'est le tissu alors sur les lignes ou les deux sont je veux faire la somme.... pas très clair comme ca mais voila ma macro

Private Sub CommandButton2_Click()

Dim operateur As String
Dim typetissu As String
Dim reportopera As String
Dim reporttissu As String

Sheets("blotter").Cells(i, 1).Value = operateur
Sheets("blotter").Cells(i, 2).Value = typetissu

Sheets("calculateur").Range(A2).Value = reportopera
Sheets("calculateur").Cells(i, 2).Value = reporttissu


If operateur.Value = reportopera.Value And typetissu.Value = reporttissu.Value Then
Sheets("reporting").Cells(i, 3) = WorksheetFunction.Sum(Cells(i, 7))

End If

End Sub

2 réponses

incaout Messages postés 347 Date d'inscription   Statut Membre Dernière intervention   74
 
Salut,

Je vois déjà deux problèmes dans ta fonction :

1) la variable i n'a pas de valeur de départ
2) il manque .value dans "cells(i,3)" ---> cells(i,3).value

Je ne connais pas la fonction "WorksheetFunction.Sum(Cells(i, 7))", mais si i prend une valeur déterminée, la somme ne concerne qu'une seule cellule et donc il n'y a pas de somme en fait.

Peut être faut il une boucle pour parcourir les valeurs...

enfin, voilà quelques pistes.

Bon courage.

A+

IC
0
01delph75 Messages postés 7 Date d'inscription   Statut Membre Dernière intervention  
 
je ne sais pas mettre de fonction somme sous VBA j'ai tenté pas mal de choses que les sites préconisent mais rien.

J'ai rectifier. value

i c'est les lignes où se présentent les deux valeurs.
Je peux pas déterminé sa valeur...
donc je voudrais la somme entre les lignes où il y a les deux autres valeurs....

sans résultat
0