VBA : Cacher des groupes selon la valeurs d'une cellule

Bonjour a tous

J'ai créer un formulaire sous excel avec différentes questions et un système de score qui est calculé automatiquement. Je voudrais améliorer mon questionnaire en affichant des questions en fonction de certain score.

Par exemple, en J6, j'ai le score d'une question qui s'affiche. SI J6 = 1 alors la question qui est sur les lignes 245 à 257 reste cacher (groupe minimisé) et si J6 = 2 alors la question (l40 - 45) s'affiche (groupe de ligne se maximise).

J'ai voulu faire ca en passant par VBA avec la formule suivante :

Sub cachequestion()

If J6 = 1 Then

Rows("245:257").Select

ExecuteExcel4Macro "SHOW.DETAIL(1,257,False,245)"

Else

If J6 = 2 Then

Rows("245:257").Select

ExecuteExcel4Macro "SHOW.DETAIL(1,257,true,245)"

End If

End If

End Sub

Forcement ca ne fonctionne pas :s

Est ce que quelqu'un peut me proposer une solution?

Merci d'avance

Bonjour,

Comme ceci :

Sub cachequestion()
If Range("J6") = 1 Then
Rows("245:257").Hidden = True
Else
If Range("J6") = 2 Then
Rows("245:257").Hidden = False
End If
End If
End Sub

Amicalement

Dan

PS : Si ton pb est terminé n'oublie pas de mettre RESOLU en utilisant la liste déroulante au bas de ton premier message

Merci de ta participation.

Merci

Pile ce que je voulais!

Simple et efficace

Sujet resolu

Rechercher des sujets similaires à "vba cacher groupes valeurs"