Vba logiciel pour apprendre les verbes

bobtipitt -  
 ghsf -
Bonjour,
Comme je l'ai dis dans le titre c'est un logiciel de verbe pour apprendre aux enfants leurs verbes. Il est bientot fini.
Mais j'ai quelque complication :

1. Comment je fais pour (avec if) vérifier toute un tableau je vous cîte
re = Range("C3:C8").Value
reste = Range("IP65480:IP65485").Value
If re = reste Then
comp = MsgBox("Bravo vous avez bien réussi ce tablau !", vbnext, Bravo!)
Select Case comp
Case vbnext
End Select
Else
If Range("C3").Value = Range("F6500").Value Then
reponse = MsgBox("Est-ce que vous avez toute remplie le tableau à toutes les personnes ?", vbYesNo)
Select Case reponse
Case vbYes
MsgBox "Je suis pas sur vérifier !"
Case vbNo
MsgBox "Continuez"
End Select

Else
Je = Range("IP65480").Value
jeb = Range("C3").Value
tu = Range("IP65481").Value
tub = Range("C4").Value
il = Range("IP65482").Value
ilb = Range("C5")
nous = Range("IP65483").Value
nousb = Range("C6").Value
vous = Range("IP65484").Value
vousb = Range("C7").Value
ils = Range("IP65485").Value
ilsb = Range("C8").Value
If Je = jeb Then
     MsgBox "Le Je est correcte!"
Else
    MsgBox "Corriger votre Je"
End If
If tu = tub Then
MsgBox "Le Tu est correcte!"
Else
MsgBox "Corriger votre Tu"
End If
If il = ilb Then
     MsgBox "Le Il est correcte!"
Else
    MsgBox "Corriger votre Il"
End If
If nous = nousb Then
     MsgBox "Le Nous est correcte!"
Else
    MsgBox "Corriger votre Nous"
End If
If vous = vousb Then
     MsgBox "Le Vous est correcte!"
Else
    MsgBox "Corriger votre Vous"
End If
If ils = ilsb Then
     MsgBox "Le Ils est correcte!"
Else
    MsgBox "Corriger votre Ils"
End If
End If
End If
End Sub

Je vous l'ai dis il n'est pas toute fini !
2. Si j'ai 2 boutton et que les deux c'est pur vérifier. Le premier c'est pour le mode simple alors toute est correcte le deuxième c'est pour le mode avec des nivaux (c'est le code dans haut) comment je fais pour que, dans mon msgbox :
comp = MsgBox("Bravo vous avez bien réussi ce tablau !", vbnext, Bravo!)
Select Case comp
Case vbnext
End Select

Si la case vbnext marche vraiment... Je veux que le nivaux de la personne sois écris en Feuil2!C1 je veux que quand tu clique sur next sa aille chercher le nivaux qui est disons A5 et qui l'amène a A6 puis je veux que il aille cherche dans met code (le titre des codes sont leurs type de Nivaux... A1, A2, A3... B4 sa arrète toujours a 11 et sa fini a la lettre K).

C'est compliqquer de lamanière dont je l'explique...
tkt Merci d'avance
Bobtipitt

1 réponse

ghsf
 
il fau te dir Tg ou koi
0

Discussions similaires