XL 2016 Tableau croisé dynamique sur plusieurs feuilles

toni89

XLDnaute Nouveau
Bonjour,
J'aimerais savoir si il est possible d'inclure un tdc a mon fichier pour gérer plus facilement les données?
en vous remerciant d'avance pour votre aide.
le but étant d'avoir un tdc sur la colonne Noms prénoms , jours de présence et nom de la classe ainsi que la colonne de jours de présence par élève?
Toni
 

Fichiers joints

Dernière édition:

sousou

XLDnaute Accro
Bonjour.
Sans finaliser complètement ta demande, je te propose dans le fichier joint une piste pour obtenir les résultats que tu souhaites
Si j'ai bien compris ton fichier!
j'ajoute deux feuilles 'parametres' et 'tcd'
dans paramètres je liste toutes le classes
la macro mestcd() va rechercher tous les élèves de chaque classe et va construire dans la feuille tcd l'ensmble des informations.
Tu n'as plus qu'a y mettre un tcd
 

Fichiers joints

toni89

XLDnaute Nouveau
Bonjour.
Sans finaliser complètement ta demande, je te propose dans le fichier joint une piste pour obtenir les résultats que tu souhaites
Si j'ai bien compris ton fichier!
j'ajoute deux feuilles 'parametres' et 'tcd'
dans paramètres je liste toutes le classes
la macro mestcd() va rechercher tous les élèves de chaque classe et va construire dans la feuille tcd l'ensmble des informations.
Tu n'as plus qu'a y mettre un tcd

bonjour,
je vous remercie, pour votre aide.
j'ai rajouter une colonne supplémentaire dans la macro, j'aimerais quelle soie automatique lors du changement d'une valeur sur l'une des classes.
seriez vous en mesure de trouver une solution.
bien cordialement
 

Fichiers joints

sousou

XLDnaute Accro
re
je crois comprendre que tu vaux ajouter la colonne ak
Cette dernière étant une formule tu dois faire un collagespecial
modifie comme ceci.

.Range("a1").Offset(0, 0) = classe
.Range("a1").Offset(0, 1) = n
.Range("a1").Offset(0, 2) = n.Offset(0, 1)
n.Offset(0, 36).Copy
.Range("a1").Offset(0, 3).PasteSpecial (xlPasteValues)
.Range("a1:d1").Insert (xlDown)
 

toni89

XLDnaute Nouveau
Oui j'ai besoin des données de la colonne ak
J'ai une erreur sur la macro.
j'espère ne pas abusé de votre temps.
merci pour votre aide.

re
je crois comprendre que tu vaux ajouter la colonne ak
Cette dernière étant une formule tu dois faire un collagespecial
modifie comme ceci.

.Range("a1").Offset(0, 0) = classe
.Range("a1").Offset(0, 1) = n
.Range("a1").Offset(0, 2) = n.Offset(0, 1)
n.Offset(0, 36).Copy
.Range("a1").Offset(0, 3).PasteSpecial (xlPasteValues)
.Range("a1:d1").Insert (xlDown)
 

Discussions similaires


Haut Bas