Agrégation de donnéesRésolu

Question

Bonjour, 
 
 J'ai des tableaux sur différentes feuilles qui présentent des données de la même façon. Pour simplifier, une colonne avec le code d'une action boursière, l'autre colonne avec la quantité détenue, chaque feuille représentant un portefeuille. Les données sont à chaque fois triées par ordre alphabétique.

J'aimerai créer une feuille de synthèse sur laquelle je retrouverai l'ensemble des titres détenus sur tous les portefeuilles et, pour chaque titre, la quantité totale détenue. J'ai beau essayer les fonctions de consolidation ou autres, je n'y arrive pas, que ce soit en direct ou par macro...

Quelqu'un aurait-il une solution ?
Merci d'avance.
--

ucfoutu · Answer

Bonjour,
Essaye d'éviter de nous parler d' "actions boursières", de "quantités détenues",  de "portefeuilles", de "titres", de "consolidation", etc ...
Tu auras mon aide lorsque tu exprimeras ta demande différemment. ===>>
Excel est un tableur : il traite des colonnes, de lignes, de cellules (quel que puisse être leur contenu).
Expose-nous donc, dans cet esprit, ce que tu as (sur tes différentes feuilles) et ce que tu veux en tirer (en ne parlant que de colonnes, lignes, cellules).
Fais-le de manière claire, technique et concise. Tu auras alors mon aide.

jordane45 · Answer

Bonjour,

En gros... tu as X feuilles... 
Sur chacune de ces feuilles (tes portefeuilles) Une colonne qui contient la liste des titres et (sur la même ligne) dans une seconde colonne la quantité total correspondante. 
Ces données... tu souhaites les ajouter dans une feuille de synthèse.

(Les colonnes sont identiques dans chaque feuille ? colonne A et colonne B par exemple ?)

Je dirais pour commencer :
Qu'as tu essayé de coder ? (montre nous...)

Au cas où tu n'aurais pas encore commencé.... histoire de t'aider à démarrer... 
- As tu, à l'aide de l'enregistreur de Macros essayé de "copier/coller" des cellules d'une feuille à une autre ? ( fais le... tu auras un début de réponse).
- Ensuite...As tu essayé de boucler sur les feuilles de ton classeur ?
- Et pour finir, pour que tu puisses ajouter les lignes que tu colles à la suite des précédentes... as-tu cherché une instruction en VBA qui te fournirai le Numéro de la dernière ligne d'une feuille ?

NB : Comme cela t'a été dit dans une autre discussion.. ce forum n'a pas pour vocation de réaliser le code à ta place. 

En suivant mes quelques remarques précédentes tu devrais pouvoir commencer à écrire du code.
Ensuite..si avec ce code tu rencontres des soucis..n'hésites à pas à venir nous demander de l'aide. (aide que nous t'apporterons alors avec plaisir).

Et voila un début de code (le travail est désormais bien maché..)

Sub test()
Dim strFSynt As String
    strFSynt = "synthese" ' nom de la feuille de synthese
    
'--------------------------------
'Boucle sur les feuilles du classeur
'--------------------------------
For Each sh In ThisWorkbook.Sheets
    'on exclut la feuille synthese
    If sh.Name <> strFSynt Then
        Debug.Print "Feuille : " & sh.Name & " --> nbLignes = " & lastRow(sh.Name)
        
        '--------------------------------
        'ici les actions de copier/coller
        '--------------------------------
        DernLigneSynthese = lastRow(strFSynt)
        Debug.Print "Feuille Synthèse : dernière ligne = " & DernLigneSynthese
        '...
        '...
    End If
Next

End Sub

Function lastRow(sheetname As String) As Integer
    lastRow = Sheets(sheetname).Range("A" & Rows.Count).End(xlUp).Row
End Function

Cricri1670 · Answer

Je suis l'auteur de "l'étrange" message privé...
J'ai posé trois questions sur le forum et seul UCFOUTU est capable de me faire des réponses m'expliquant que ce que je fais est inutile ou que je m'explique mal. Les administrateurs du forum sauront le constater eux-mêmes... Il n'y a que lorsque je m'étonne de cette attitude que cette personne avance dans la direction qui est le but de ce forum : aider les autres. En cela, je le remercie pour son dernier post (en mettant à part sa colère) qui m'apporte un début de réponse avec la fonction SUMIF que je vais m'empresser de regarder de plus près.

Je précise qu'il n'y a aucun chantage de ma part au -1. Lors d'une question précédente, une des réponses de UCFOUTU me paraissant particulièrement "inadaptée", je lui en avais attribué un que j'ai retiré suite à un changement d'attitude. Je m'étonnais juste de retrouver ce +1/-1 à coté de la réponse de jordane45, et pas à coté de celle de UCFOUTU. C'est dire mon ignorance du fonctionnement du forum. L'utilisation du message privé était donc pour moi la seule solution de répondre à ce monsieur.

Ce n'est que mon avis, mais je ne trouve pas que son attitude colle avec l'esprit d'un forum d'entraide qui ne devrait pas non plus à régler des comptes.

 Merci néanmoins pour cette fonction que je vais regarder.
--

jordane45 · Answer

J'ai posé trois questions sur le forum et seul UCFOUTU est capable de me faire des réponses m'expliquant que ce que je fais est inutile ou que je m'explique mal

En général c'est parce qu'il a été le premier à te répondre..sinon ça aurait tout aussi bien pu être moi qui me serais permis de te faire des remarques sur la rédaction de tes questions.

Je t'invite d'ailleurs à lire ceci :
http://codes-sources.commentcamarche.net/contents/11-charte-de-commentcamarche-net-conseils-d-ecriture

Il y est bien indiqué (entre autres choses) que :
1 - Nous ne faisons ni les recherches ni l'écriture des codes à votre place
2 - Que lorsque vous posez une question... vous devez être le plus explicite / Précis / Détaillé possible et; s'il existe,..joindre votre code.

 Un bon exemple : 
lorsque tu me dis :
J'ai déjà fait tout ce que tu décris, la recopie (soit par code soit à la main pour tester)
N'aurais-tu pas pu nous le dire dès le départ ??? ça m'aurait éviter de perdre du temps à te proposer ce code...
Et ainsi... on aurait pus essayer de te proposer quelque chose qui collerait directement avec tes besoins.......

J'espère donc que par la suite... tu seras plus vigilant quant à la rédaction (le contenu, le fond et la forme..) de tes questions.
Tu obtiendras plus (et surement de meilleurs) réponses que ce soit de ma part, celle d'Ucfoutu ou des autres membres du forum.

Cricri1670 · Answer

Merci ucfoutu !

J'avais entre temps testé la fonction "Données>Consolider" mais elle ne me convient pas du fait qu'elle ajoute une sorte d'arborescence sur le coté. Comme je l'ai expliqué à jordane45, ma question était vague car je ne savais pas si il fallait passer par du code ou une fonction telle que celle essayée.

Je vais tester ton code que je ne comprends pas intégralement pour le moment. Néanmoins, j'apprécie ton geste et je ne sollicite plus les membres avant d'avoir compris et testé ce que tu me proposes.

Concernant ton idée de stocker les données sur une feuille annexe, j'y avais songé car je savais que c'est une idée plus que recommandable. Je ne l'ai pas appliqué pour le moment mais j'y viendrais sans doute, à moins que tout ceci ne prenne finalement la forme d'une application VB.NET...

Pour le coup, j'aurais aimé mettre un +1 (mérité) mais ton code a été mis en commentaire au lieu de réponse (si je commence à bien saisir le fonctionnement du forum).

Merci à tous d'avoir pris le temps de me répondre.

Agrégation de données

5 réponses

Votre réponse

Discussions similaires