XL 2010 Condenser les données d'un tableau

FCMLE44

XLDnaute Impliqué
Supporter XLD
Bonjour

Etape 2 de mon projet

Les onglets se créant automatiquement en fonction des données de la feuille DSN, je souhaite, pour chaque onglet créé condenser les données obtenues.

Feuille TC :
En ligne 4 colonne AN, je souhaite condenser les données se trouvant en colonne AD à AK (cf exemple fichier joint).

Lors de la mise à jour de chaque onglet via macro Balaye1, il se mettrait à jour automatiquement

Cordialement
 

Pièces jointes

  • DSN ESSAI.xls
    94 KB · Affichages: 51

FCMLE44

XLDnaute Impliqué
Supporter XLD
c'est ce que je viens de faire

si je resonne bien il faut que je rajoute ceci a la fin avec les bonnes colonnes

VB:
   FDest.[A1:AL1].Value = Titres1
      FDest.[AN1].Value = "TABLEAU RECAPITULATIF"
      FDest.[AO1].Value = NomFeui
      FDest.[A2:AL5001].Value = TDt
      FDest.[AN3:AU3].Value = Titres2
      FDest.[AN4:AU3003].Value = TCd
      FDest.Cells(LCd + 5, "AU").FormulaR1C1 = "=SUBTOTAL(9,R4C:R[-2]C)"
      FDest.Columns.AutoFit
      FDest.[A:AM].Columns.Hidden = True
      Next NumSiret, CodSiret

cordialement
 

FCMLE44

XLDnaute Impliqué
Supporter XLD
C'est quoi une boucle

comme ca
VB:
LRc = LRc + 1
         TRc(LRc, 1) = LibCot.Id: TRc(LRc, 2) = CodCot.Id: TRc(LRc, 3) = Commune.Id
         TRc(LRc, 4) = Qualif.Id: TRc(LRc, 6) = TxCoti.Id: TRc(LRc, 7) = TxAtT23003.Id
         For Each Détail In Commune.Co
            LRt = LRt + 1
            For C = 1 To 37: TRt(LRt, C) = Détail(C): Next C
            TRd(LRd, 5) = TRd(LRd, 5) + Détail(34)
            TRd(LRd, 8) = TCd(LRd, 8) + Détail(38) ' Détail(37)
 

Dranreb

XLDnaute Barbatruc
Une boucle est toute série d'instruction qui s'exécute répétitivement.

Prenez :
TDt et LDt pour le tableau et le numéro de ligne courant du détail reproduit dans les feuilles,
TCd et LCd pour le tableau et le numéro de ligne courant du condensé reproduit dans les feuilles,
TRc et LRc pour le tableau et le numéro de ligne de départ dans la récap pour la feuille en cours.
Contrairement aux deux premiers vous devrez donc ajouter à LRc 1, 2 ou 3 selon que vous voulez que ce soit cumulé sur la 1ère, 2ième ou 3ième ligne du bloc réservé pour cette feuille dans la récap.
 

Dranreb

XLDnaute Barbatruc
Oui mais je n'y ai rien compris.
Il m'avait seulement vaguement semblé qu'il y avait juste systématiquement 3 ou 4 lignes par feuille.
Alors faites LRc = LRc + 4 plus haut, quand on entame la feuille.
Et dans la boucle détail, pour cumuler le Détail 36 dans la 3ième ligne, colonne 5 faite TRc(LRc + 2, 5) = TRc(LRc + 2, 5) + Détail(36)
 

Discussions similaires

Statistiques des forums

Discussions
312 164
Messages
2 085 877
Membres
103 009
dernier inscrit
dede972