rassembler des tableaux en UN tableau final Résolu/Fermé

Question

Bonjour,

Après mes premiers post, et grâce à l'aide de pijaku, j'ai ma feuile modèle dupliquée x fois (excel, vba)!
Sous chacune de ces répliques, je vais construire un tableau de données(grâce à une macro déjà réalisée). Toutes les feuilles étant basées sur le meme modèle, mes tableaux débuteront tous de la meme ligne sur chacune des feuilles. Cependant, tous ces tableaux auront des tailles différents.

Le but étant de creer une macro me permettant de récuperer tous ces tableaux et de superposer ces données dans un tableau unique et final dans une nouvelle feuille.

Petit récap : je pars d'un classeur 1, à 3 feuilles : # feuille 1 = feuille initiale du projet
                                                                       #feuille 2 = feuille modele
Sur la feuille 1 apparait le bouton permettant de dupliquer x fois la feuille 2 dans un nouveau classeur.

But : creer un nouveau bouton sur la feuille 1 du classeur 1 permettant de creer un tableau récapitulatif des différents tableaux du nouveau classeur. Tous ces tableaux devront se superposer, sans ligne vide, les uns après les autres. Ces données devront apparaitre sous la base d'un tableau  modèle (avec titre et colonnes définis) situé sur la feuille 3 du classeur 1.

J'en demande peut-être un peu trop, non!!! Je suis déjà à la tache mais ca me semble bien compliqué pour mes pauvres compétences...

Si ca tente quelqu'un, ou pour juste me lancer sur une piste convenable...

Merci par avance et bon courage à tout le monde.

Bye & Take care

pijaku · Answer

Tu veux , dans ta feuil3, à partir de la cellule A2 (A1 étant ton entête de colonne) coller le tableau que tu as sur la feuil1 de ton autre classeur, à sa suite, donc par exemple en A11 coller celui qui est sur ton classeur 2 feuil2 etc ... x fois x étant le nombre de duplication de ta feuille modèle. C'est bien ça?

pijaku · Answer

non c'est clair.

m@rina · Answer

Bonjour,

A vue d'oeil, s'il s'agit de totaliser toutes les données, je verrais bien la fonction de Consolidation.
Cependant, comme on ne connaît rien de tes données, c'est pas facile à imaginer.
Peux-tu mettre un exemple ici rempli avec deux ou trois onglets pré-remplis pour voir un peu à quoi ça ressemble
https://www.cjoint.com/

m@rina

m@rina · Answer

Bonjour,

Tu vas sur le site que je t'ai indiqué. Tu cliques sur Parcourir pour  télécharges ton fichier. Ensuite du cliques sur le bouton "Créer le lien Cjoint", puis tu colles le lien ici.

m@rina

m@rina · Answer

Tu as des fichiers liés dans le lien que tu donnes. Moi je ne peux pas l'ouvrir.

m@rina

m@rina · Answer

Bonjour,

Effectivement c'est beaucoup mieux.

En fait je pensais que tu voulais faire une consolidation, avec un calcul consolidé sur plusieurs feuilles.

Ton problème est fort simple. Il faut simplement copier-coller tous tes tableaux sur la feuille bilan.

Voci une macro qui s'appuie sur le classeur fourni en exemple : à savoir que chaque feuille sera traitée (sauf la dernière qui est la feuille pour le bilan).
On copie de la cellule D3 où commencent les données jusqu'à la cellule J avec une variable pour la dernière ligne (qui varie !;).

Tu devras mettre dans ta feuille bilan juste la ligne d'en-tête.

Sub bilan()
Dim der_ligne, feuille

For feuille = 1 To ActiveWorkbook.Worksheets.Count - 1
    der_ligne = Worksheets(feuille).Range("D65536").End(xlUp).Row
    Worksheets(feuille).Range("D3:J" & der_ligne).Copy _
    Destination:=Worksheets("Bilan").Range("A65536").End(xlUp).Offset(1, 0)
 Next feuille

End Sub
m@rina

m@rina · Answer

bonsoir, 

C'est surtout que tu aurais mieux fait de restger dans le même post. On n'est pas censé suivre et être parfaitement au courant de toute ton histoire...

Pour moi ton classeur 1 ne sert à rien... Personnellement, j'aurais créé une macro complémentaire qui :
- crée un nouveau classeur
- crée autant de feuille que nécessaire formatées à ton goût
- crée la feuille bilan

Tu te compliques pas la vie avec les noms : tu dis ActiveWorkbook, et ta macro ne passe pas d'un classeur à l'autre...

m@rina

bes1911 · Answer

Bonjour Marina,
Ta macro me convient vraiment,
le seul probleme c est que je n arrive pas a ladapter a mon cas de figure.

Je possede un classeur excel avec 6 feuilles (un tableau par feuille) dont la mise en forme est IDENTIQUE.

J aimerais juste rajouter une feuille (bilan) en premiere page qui regroupe les donnees de chaque feuilles. 

L'ideal ca serait que cette macro ne fasse pas que COPIER betement a la suite sur "bilan" les donnees des autres feuilles, car la macro que tu as donnee juste avant semble fonctionner comme ceci. L ideal serait donc que la liste des donnees de "bilan", regroupant toutes les donees des autres feuilles, se mette a jour en SUPERPOSANT et non en COPIANT les donnees.

Tu comprends ce que je veux dire ?  :=]


Seb

Rassembler des tableaux en UN tableau final

8 réponses

Discussions similaires