Erreur Bloc IF
r4944
Messages postés
122
Date d'inscription
Statut
Membre
Dernière intervention
-
Utilisateur anonyme -
Utilisateur anonyme -
Bonjour ,
j'ai besoin d'appeler deux fonctions différentes ici vous pourriez voir mon code mais j'ai eu un probléme de compilation '' Block if without end if ''
j'ai besoin d'appeler deux fonctions différentes ici vous pourriez voir mon code mais j'ai eu un probléme de compilation '' Block if without end if ''
Private Sub CommandButton3_Click()
'Condition pour Results
'-----------------------------------------------------------------------------------------------------------------------------------------
If UserForm1.txtExcelDatasheet.Value <> "" Then
'Condition pour Results
'-----------------------------------------------------------------------------------------------------------------------------------------
If UserForm1.Results.Value = "Screening" Then
'Condition pour number of stream(s)
'-----------------------------------------------------------------------------------------------------------------------------------------
If UserForm1.CheckBox1.Value = True And UserForm1.CheckBox2.Value = False And UserForm1.CheckBox3.Value = False And UserForm1.CheckBox4.Value = False And UserForm1.CheckBox5.Value = False And UserForm1.CheckBox6.Value = False Then
'Appel de macro "Emails_Screening"
'-----------------------------------------------------------------------------------------------------------------------------------------
Call Emails_Screening
If UserForm1.Results.Value = "Written exam" Then
If UserForm1.CheckBox1.Value = True And UserForm1.CheckBox2.Value = False And UserForm1.CheckBox3.Value = False And UserForm1.CheckBox4.Value = False And UserForm1.CheckBox5.Value = False And UserForm1.CheckBox6.Value = False Then
'Appel de macro "Emails_Written_Exam"
'-----------------------------------------------------------------------------------------------------------------------------------------
Call Emails_Written_Exam
End If
Else
MsgBox ("Cette partie est en cours de développement / This section is under development")
End If
Else
MsgBox ("Cette partie est en cours de développement / This section is under development")
End If
Else
MsgBox ("Merci de bien choisie votre gabarit / Thank you for your well chosen template")
End If
End Sub
A voir également:
- Erreur Bloc IF
- Bloc-notes (windows) - Télécharger - Traitement de texte
- Erreur 0x80070643 - Accueil - Windows
- Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
- J'aime par erreur facebook notification - Forum Facebook
- Bloc note gratuit - Télécharger - Agendas & Calendriers
