VBA Erreur 1004
Malak BJ
Messages postés
1
Statut
Membre
-
ccm81 Messages postés 11033 Statut Membre -
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
S'il vous plait, J'ai un Button Supprimer sur ma UserForm au debut j'avais un code qui ça marche mais lorsque j'ai ajouté une colonne dans la feuil excel, et J'ai ajouter un TextBox sur ma UserForm, ça ne marche plus maintenant
Voilà le code:
Private Button_Supprimer_Click()
If TextBox6 <> 0 Then
Dim Msg, Ctxt, Style, Response
Msg = "Voulez vous vraiment supprimer ce sers?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Response = MsgBox(Msg, Style)
If Response = vbYes Then
Sheet2.Rows(i).Delete
i = i - 1
SpinButton1.Value = i
Else
Exit Sub
End If
End If
End Sub
lorsque je cick Button Yes ( je confirme la suppression ) ça me donne l'erreur 1004 " Delete method of Range Class Failed")
S'il vous plais une Aide
S'il vous plait, J'ai un Button Supprimer sur ma UserForm au debut j'avais un code qui ça marche mais lorsque j'ai ajouté une colonne dans la feuil excel, et J'ai ajouter un TextBox sur ma UserForm, ça ne marche plus maintenant
Voilà le code:
Private Button_Supprimer_Click()
If TextBox6 <> 0 Then
Dim Msg, Ctxt, Style, Response
Msg = "Voulez vous vraiment supprimer ce sers?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Response = MsgBox(Msg, Style)
If Response = vbYes Then
Sheet2.Rows(i).Delete
i = i - 1
SpinButton1.Value = i
Else
Exit Sub
End If
End If
End Sub
lorsque je cick Button Yes ( je confirme la suppression ) ça me donne l'erreur 1004 " Delete method of Range Class Failed")
S'il vous plais une Aide
