Discussion :

[Pascal415]

Bonjour,
Je commence en VBA, mais je compte bien comprendre tout ce que je fait. Les explications accompagnant les codes sont donc les bienvenues!

Donc j'ai une fonction associé à un bouton, qui fonctionne si je suis dans visual basic éditor, et que ma page active est "Sommaire".

Aussi, j'aimerais créer une boucle qui exécutera mes "Sumif" pour les cellules
D6 à U.... jusqu'à la dernière ligne contenant une valeur dans la colonne A

Je vous remercie à l'avance pour votre aide!!!

Pascal

Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Sub CommandButton19_Click()
 
    Dim TotalVar As Long     
    Worksheets("Sommaire").Range("D6").Select 
    With ActiveCell
 
        ActiveCell.Offset(1, 0).Range("A1").Select
        ActiveCell.Value = WorksheetFunction.SumIf(Worksheets("Données").Columns("C"), "=" & Worksheets("Sommaire").Range("A7"), Worksheets("Données").Columns("F"))
        .Offset(2, 0).Range("A1").Select
        ActiveCell.Value = WorksheetFunction.SumIf(Worksheets("Données").Columns("C"), "=" & Worksheets("Sommaire").Range("A8"), Worksheets("Données").Columns("F"))
 
        ActiveCell.Offset(-1, 1).Range("A1").Select
        ActiveCell.Value = WorksheetFunction.SumIf(Worksheets("Données").Columns("C"), "=" & Worksheets("Sommaire").Range("A7"), Worksheets("Données").Columns("G"))
 
        TotalVar = .Value
    End With
 
    End Sub

[PPz78]

Bonjour,

"Sulif" c'est quoi au juste ?

Et finalement que souhaites tu faire?

PPz

[Gorfael]

Salut Pascal415 et le forum

Je commence en VBA, mais je compte bien comprendre tout ce que je fais.

Ça c'est la bonne option.
Commence par supprimer les Select/ActiveCell, qui parsème ton code.

Déclarer ses variables présente plein d'avantages, tu déclares TotalVar en long, bien, mais c'est la dernière instruction de ta macro. Elle sert à quoi alors ?

Quand à ton code, il faudrait savoir ce que tu en attends.
Tu utilises une fonction de feuille pour calculer la somme des cellules de "données" des colonnes F & G dont la valeur en C est égale à A7 ou A8 de "Sommaire".
1ère question :
- Pourquoi ne pas mettre la formule dans la cellule, au lieu d'un résultat figé, ne tenant compte d'aucune modification ?
2ème question :
- Qu'est-ce que tu attends ? Tout ce que tu nous donnes parle de C et F & G, alors que tu demandes des sommes sur D à U.

On ne connaît que ce que tu veux bien nous dire. Tout ce qui est évident, ne l'est que pour toi. Si on doit interpréter, ce sera forcément dans le mauvais sens, suivant la loi de Murphy.
Alors explique ce que tu veux le plus précisemment possible.
A+

[Pascal415]

Tu as entièrement raison, je n'étais vraiement pas clair après relecture...

J'ai fait comme tu le proposes, soit mettre les calculs directement dans les cellules, et je voulais attendre la fin de mon fichier pour voir son efficacité et sa lourdeur. Maintenant, je peux confirmer que c'est correcte.

Merci pour ton aide!
P.S. : PPz78 : Sumif (et non Sulif) est la macro de Somme.Si