Mise en forme tableau

[kheldar]

Bonjour au forum,

Ci-joint un tableau expliquant ma problématique.

Je souhaite en cochant des cases indicateur en haut à gauche de mon tableau que les indicateurs cochés apparaissent et par les autres avec de ce fait un décalage sur les colonnes.
Aucun calcul ne sera effectué après ces choix, juste mise en forme du tableau.

Merci d'avance pour toutes vos réponses et solutions.

Cordialement, Kheldar.

 

[JCGL]

Re : Mise en forme tableau

Bonjour à tous,

Peux-tu être plus explicite ?

Pas de case à cocher dans le fichier
25 Modules avec ou sans codes
Où sont les données ?

A+

 

[kheldar]

Re : Mise en forme tableau

Re bonjour,


Petit problème avec mon fichier précédent.

Voici le nouveau fichier.

Une autre question, en cochant une seule case, est-il possible de faire apparaître plusieurs colonnes en même temps dans le tableau.

Petite précision sur les cases à cocher :si je coche CA, je souhaite voir le CA de chaque magasin......

Merci, en espérant que cette fois-ci,je soit plus clair et prcis dans mes demandes.

 

[JCGL]

Re : Mise en forme tableau

Bonjour à tous,

Un essai avec application d'une MeFC si la case est cochée c'est donc VRAI

A+

 

[skoobi]

Re : Mise en forme tableau

Bonjour kheldar,

salut JC, toujours un plaisir de te croiser 🙂,

Si tu souhaites masquer les colonnes, un essai par macro:

Sub Caseàcocher1_QuandClic()
Dim Col As Long
For Col = 2 To 8 Step 3
  Columns(Col).Hidden = IIf(ActiveSheet.Shapes("Case à cocher 1").ControlFormat.Value = xlYes, False, True)
Next
End Sub
Sub Caseàcocher2_QuandClic()
Dim Col As Long
For Col = 3 To 9 Step 3
  Columns(Col).Hidden = IIf(ActiveSheet.Shapes("Case à cocher 2").ControlFormat.Value = xlYes, False, True)
Next

End Sub
Sub Caseàcocher3_QuandClic()
Dim Col As Long
For Col = 4 To 10 Step 3
  Columns(Col).Hidden = IIf(ActiveSheet.Shapes("Case à cocher 3").ControlFormat.Value = xlYes, False, True)
Next

End Sub

Il faut associer chaque procédure à la case correspondante

 

[JCGL]

Re : Mise en forme tableau

Bonjour à tous,
Salut Skoobi 🙂,

Encore un ami qui "vaut" un message et non une Édition😉

A++ 😀
A+ à tous