Bonjour à tous,
je souhaiterais avoir de l'aide pour la programmation d'un QCM VBA un peu complexe ( je suis tout à fait débutant en VBA).
Voici le problème : En fonction de chaque type question, une certaine partie du User forme doit apparaître correspondante au type de question.
les 3 types de questions sont :
-QRU : question à réponse unique;
-QRM : question à réponse multiple,
-NUMERIQUE : question à réponse numérique à taper soi-même.
1.Lorsque la question est de type QRU : la partie du User forme qui doit s'afficher est "FRM_Options"
2.Lorsque c'est "QRM" la partie qui doit s'afficher est "FRM_Check"
3.Et enfin lorsque la question est de type "NUMERIQUE" "FRM_write" doit s'afficher.
Sur la page Excel, j'ai renommé la colonne précisant le type de question : "Type_Question"
Voici le code que j'ai essayé :
J'espère que mon problème est assez intelligible.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 Private Sub Userform_Questionnaire_Initialize() Me.TextBox1.Value = Range("Intitule").Value If ("Type_Question") = "QRU" Then Frm_Check.Visible = False Frm_Options.Visible = True Frm_Write.Visible = False If ("Type_Question") = "QRM" Then Frm_Check.Visible = True Frm_Options.Visible = False Frm_Write.Visible = False Else Frm_Check.Visible = False Frm_Options.Visible = False Frm_Write.Visible = True End If End If End Sub
Merci d'avance pour votre aide !
Partager