VBA Creation d'un QCM complexe
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é :
Code:
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 |
J'espère que mon problème est assez intelligible.
Merci d'avance pour votre aide !
