Erreur au lancement d'un Userform
Bonjour à tous,
je me suis mis il y a peu de temps à la création de macros, je suis en train de créer un jeu d'énigmes.
Mon problème est le suivant lorsque je lance mon userform, j'ai le message d'erreur suivant :
"erreur de compilation : un appel de fonction dans la partie gauche de l'affectation doit renvoyer Variant ou Object"
Voici le code :
Private Sub UserForm_Activate()
Dim n As Integer
n = 1
If n < 31 Then
If Sheets("Feuil2").Cells(n, 4) = 0 Then
TextBox1 = "Enigme n°" & n
TextBox2 = Sheets("Feuil2").Cells(n, 2).Value
Else
n = n + 1
End If
Else
MsgBox = "Fin de la partie"
End If
End Sub
Pour plus d'info, dans la feuil2 du classeur se trouve en A le num des énigmes en B les énigmes, en C les réponses et en D une valeur 0 pour une énigme non résolue et 1 si elle l'est. Dans le userform le textbox1 affiche le num d'énigme et le textbox2 l'énigme elle même.
Merci d'avance pour votre aide
C'est bon j'ai trouvé tout seul et je suis trop con lol c'était le signe "=" après msgbox
merci quand même aux personnes qui prendront le temps de lire ce post