Calcul le nombre de souscription

Bonjour

j'ai un petit problème sur ma macro et je n'arrive pas a voir comment je peux arranger cela

je vous explique mon problème en espérant que vous pourriez aider

Dans un classeur j'ai deux feuille(une feuille souscription(que je change tout les mois) et une feuille active ou j'effectue la macro.

sur la feuille souscriptions j'ai un certain nombre de vente et de rétractation(-) et je voudrais qu'il me calcule le nombre de vente avec le rétractation pour chaque tranche et que le nombre s'affiche dans la feuille active au bon endroit

voici un exemple: il ne m'affiche pas ceux qu'il faut

merci pour votre aide

6aide.xlsm (28.83 Ko)

Bonjour,

Pour la 1er partie (à adapter pour le Resil

Dim dernligne As Long
    Dim DernLigneSous As Long
    Dim i, k As Integer

        With ActiveSheet
            dernligne = .Range("B" & .Rows.Count).End(xlUp).Row 'a partir de la ligne 15
        End With

        With Sheets("SOUSCRIPTIONS") 'feuille souscriptions
            DernLigneSous = .Range("A" & .Rows.Count).End(xlUp).Row 'a partir de la ligne 22
        End With
    k = 13
        Range("D13:E" & dernligne).ClearContents
    For i = 21 To DernLigneSous
            If Sheets("SOUSCRIPTIONS").Cells(i, 1).Value = ActiveSheet.Cells(k, 2).Value Then
                ActiveSheet.Cells(k, 4).Value = Sheets("SOUSCRIPTIONS").Cells(i, 10).Value
                k = k + 1
            End If
    Next i

Re,

Et pour la totale

7aide.xlsm (28.38 Ko)

merci pour ton aide

cela me donne

16465

79107

662

alors que moi je voudrais

16473 =16465-6+5+9

79104=79107-1-1-1

656=662-10+4

Re,

As-tu que ces trois lignes à traiter ?

j'ai que ces trois tranches (mais de mois en mois on change les valeurs )

Re,

Dans ce cas teste comme cela


Re,

Au cas où il aurait plus de lignes dans SOUSCRIPTION tu peux modifier à l'avance la formule

Exemple jusqu'à la ligne 1000 (même si elles sont vides)

F = "=SUMPRODUCT((SOUSCRIPTIONS!R21C1:R1000C7=ACTIVE!RC[-2])*SOUSCRIPTIONS!R21C10:R1000C10)"
6aide-v-2.xlsm (28.00 Ko)

super ça marche mercii

est ce que tu pourrais juste m'expliquer ces lignes s'il te plais

F = "=SUMPRODUCT((SOUSCRIPTIONS!R21C1:R31C7=ACTIVE!RC[-2])*SOUSCRIPTIONS!R21C10:R31C10)"

Range("D13").AutoFill Destination:=Range("D13:D15"), Type:=xlFillDefault

Re,

Alors F= (chaine string qui reprend la formule sommeprod)

et la ligne du dessous indique la recopie de la formule vers le bas

C'est exactement comme si tu mettais la formule dans l'onglet, sauf que là tu peut l'effacer et l'envoi de la macro te recalcule

mercii beaucoup

Bonjour à tous

Une variante :

Bye !

7aide-v1.xlsm (32.96 Ko)

merci a tous

Rechercher des sujets similaires à "calcul nombre souscription"