Bonjour,
Désolé, j'ai vu qu'une question similaire avait été posée juste avant mais je n'ai pas réussi à régler le problème pour autant. J'ai un userform tout simple qui fonctionne bien, càd qu'il m'affiche bien les données dans le tableau mais pourtant il me met toujours l'erreur 424 "Objet requis" à la fin de chaque exécution.
Voici le code :
Private Sub CommandButton1_Click()
Dim ligne As Integer
If MsgBox("Confirmez-vous l'ajout des donnees ?", vbYesNo, "Confirmation") = vbYes Then
Sheets("Reponses").Select
ligne = Sheets("Reponses").Range("A456541").End(xlUp).Row + 1
Cells(ligne, 1) = CheckBox1.Value
Cells(ligne, 2) = CheckBox2.Value
Unload UserForm1
UserForm1.Show False
End If
End Sub
Je ne sais même pas si CheckBox1.Value est une bonne chose à mettre mais j'ai essayé sans les CheckBoxes et ça me faisait le même souci (et puis les données sont bien rentrées dans le tableau, c'est juste l'erreur qui me gêne…). Si quelqu'un pouvait m'aider, ce serait super ! Merci !