Masquer des colonnes en gardant leur fonctionnalité dans un graphique [Résolu]

Signaler
Messages postés
2
Date d'inscription
lundi 1 mars 2010
Statut
Membre
Dernière intervention
2 mars 2010
-
Messages postés
2
Date d'inscription
lundi 1 mars 2010
Statut
Membre
Dernière intervention
2 mars 2010
-
Bonjour,

Eh bien, voici mon problème, c'est pas tres compliqué mais ca m'embete qd meme ):
Je cherche tout simplement à masquer un certain nombre de colonnes.
Je sais que je peux utiliser Click droit- Masquer, ou bien dans le menu "data" grouper les colonnes. Cela fait apparaître au dessus de la feuille de calcul un trait au dessus des colonnes, lequel trait est terminé par un bouton + ou -(équivalent: shift+Alt+flèche droite).
Cependant, les données de mes colonnes à masquer sont utilisées pour construire un graphique et si je les masque des deux façons que je viens de citer, eh bien je perd l'info dans le graphique. Il ne tient plus compte des données des colonnes!!!

De quelle façon pourrais je contourner ce problème?
Help...

Merci par avance
Bonne journée,

3 réponses

Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
227
Salut,*
En affectant les valeurs de ta plage à un tableau dynamique puis en travaillant avec ce dernier.
Il ne te restera alors plus qu'à construite ton graphique à l'aide des données de ce tableau.


____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée" en bas d'une solution adéquate est
Messages postés
18038
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
227
Ewxemple :
ici, la colonne B est masquée
tablo = Range("A1:C100").Value
For i = 1 To 100
  For j = 1 To 3
    MsgBox tablo(i, j)
  Next
Next
*
fais le test et tu verras que tablo contient également les valeurs de la colonne masquée ...


____________________
Vous aimez Codes-Sources ? Il vous aide ? Cliquez ici pour l'aider à continuer
Cliquer sur "Réponse acceptée" en bas d'une solution adéquate est
Messages postés
2
Date d'inscription
lundi 1 mars 2010
Statut
Membre
Dernière intervention
2 mars 2010

Tout d'abord, merci bcp!

En effet le test marche tres bien et c'est une tres bonne idée.
Seulement, j'ai du mal à mettre en place la phase: construire le graphique avec le tablo dynamique.
J'ai rédigé ce code mais à l'évidence quelque chose ne colle pas...



tablo = Range("C8:H16").Value
For i = 1 To 9
For j = 1 To 6
ActiveSheet.ChartObjects("Chart 68").Activate
Set MaSerie = ActiveChart.SeriesCollection.NewSeries

MaSerie.Name = "='Planning projet'!$K$7:$K$16"
MaSerie.XValues = "='Planning projet'!$B$7:$B$16"
MaSerie.Values = "='Planning projet'!" & tablo(1, 1) & ":" & tablo(9, 1)
Next j
Next i

Je ne suis pas encore tres douée en VBA...