VBA Erreur 1004

Malak BJ Messages postés 1 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

1 réponse

ccm81 Messages postés 11033 Statut Membre 2 433
 
Bonjour

Sheet2.Rows(i).Delete
ici, i n'a pas reçu de valeur donc vaut 0 et la ligne 0 n'existe pas

bonne suite
0