Effacer et restituer des formes grâce à des procédures événementielles

Phillip

XLDnaute Occasionnel
Bonjour



J'ai une liste déroulante et j'ai crée une procédure événementielle en fonction du choix dans cette liste.


Je voudrais qu'en fonction de mon choix il y une partie de plage qui soit cachée, puis, si je le souhaite la faire réapparaître. C'est assez facile de cacher et décacher des plages, sauf que...

Dans mon cas, comme vous le voyez dans l'exemple ci-joint, j'ai des "formes". Pourquoi ces losanges en forme plutôt que des bordures obliques dans les cellules ? parce que je ne peux pas colorier une demi-cellule...

Je pourrais faire cette animation dans powerpoint vous me direz, ou avoir un logiciel spécialisé logigramme mais je suis parti comme ça...

Peut-on résoudre mon problème ?

Merci

Cordialement

Phillip
 

Pièces jointes

  • test.xlsx
    12 KB · Affichages: 11

job75

XLDnaute Barbatruc
Bonjour Phillip,

Dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :
VB:
Private Sub ComboBox1_Change()
Application.ScreenUpdating = False
Rows("1:16").Hidden = True
Select Case ComboBox1
    Case "Parcours 1": Rows("1:8").Hidden = False
    Case "Parcours 2": Rows("9:16").Hidden = False
    Case "Tous": Rows("1:16").Hidden = False
End Select
ActiveWindow.ScrollRow = 1
End Sub
A+
 

Pièces jointes

  • test(1).xlsm
    29.6 KB · Affichages: 12

Phillip

XLDnaute Occasionnel
Bonjour Job75, encore moi..

J'ai ce message...(Que j'utilise hidden ou entirerow.hidden)...

1026067


Qu'est-ce que cela signifie ?

Merci

Cordialement
 
Dernière édition:

Statistiques des forums

Discussions
311 710
Messages
2 081 781
Membres
101 817
dernier inscrit
carvajal