Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

FILTRE A METTRE EN PLACE

  • Initiateur de la discussion kINGRON
  • Date de début
K

kINGRON

Guest
VOICI UNE LISTE DE VALEUR

JE SOUHAITE METTRE EN PLACE UN PETIT TABLEAU QUI CLASSE LES 10 MEILLEURS VARIATIONS ET LES 10 MOINS BONNES VARIATION.

MERCI D AVANCE
 

Pièces jointes

  • liste.zip
    11.1 KB · Affichages: 29
  • liste.zip
    11.1 KB · Affichages: 31
  • liste.zip
    11.1 KB · Affichages: 29
R

Ronan

Guest
Re_bonsoir,

Ce genre de tableaux n'est ni plus ni moins qu'un tableau croisé dynamique.

Voir exemple dans fichier joint

Pour les actualiser, clic droit sur le TCD puis cliquer sur actualiser.
Par contre, si le tableau origine augmente en nombre de lignes, voir pour modifier les paramètres du TCD (clic droit puis assistant)

@+

Ronan
 

Pièces jointes

  • liste.zip
    13.6 KB · Affichages: 34
  • liste.zip
    13.6 KB · Affichages: 33
  • liste.zip
    13.6 KB · Affichages: 35
K

kINGRON

Guest
Merci bcp c est a peu pres ce que je voulais y a t il moyen de mettre un bouton de rafraichissement? ou mettre un rafraichissement automatic?


Merc bcp d avance,

Roni
 
R

Ronan

Guest
Bonsoir,

Concernant la plage affectée au TCD, le mieux serait d'affecter à ton tableau origine un nom calculer avec la fonction DECALER, comme ça, tu n'as pas à modifier la plage source du TCD

=DECALER($A$1;;;NBVAL($A:$A);3)

Menu INSERTION - NOM - DEFINIR

Tu inscris un nom dans le textbox NOMS DANS LE CLASSEUR

Tu inscris la formule "=DECALER($A$1;;;NBVAL($A:$A);3)" dans le textbox FAIT REFERENCE A

Dans la formule (par exemple) :

$A$1 représente la première cellule en haut à gauche de ton tableau

NBVAL($A:$A) représente le nombre de valeur qu'il y a dans la première colonne du tableau

3 représente la largeur de ton tableau (en nombre de colonne)

Bien respecter les vides entre les ; du début.

Maintenant, pour actualiser un TCD automatiquement, tu inscrit le code suivant dans un module

Sub ActuTCD ()
ActiveSheet.PivotTables("Tableau croisé dynamique1").RefreshTable
End Sub

Puis tu affectes ta macro à un bouton de formulaire

Si tu veux que ton TCD s'actualise à chaque fois que tu cliques sur l'onglet de ta feuille, tu inscris le code suivant dans un module de la feuille concernée

Private Sub Worksheet_Activate()
ActiveSheet.PivotTables("Tableau croisé dynamique1").RefreshTable
End Sub

Concernant le nom du TCD ("Tableau croisé dynamique1"), tu l'obtiens en faisant un clic droit sur le TCD puis OPTIONS DU TABLEAU

En espérant avoir été assez clair.

@+

Ronan
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…