Bonjour à tous.
Bonjour à tous.
J’ai un problème avec ma formule qui me permet de supprimer la ligne d’un tableau sur Excel grâce à un Userform
Dans mon Userform la base de données nomtableau ne comprends que les 22 premières lignes mais j’aimerais qu’elle efface les 59 lignes.
Pouvez-vous me dire ce que je dois modifier.
Merci
Voici le code
Private Sub B_sup_Click()
If Me.Enreg <> "" Then
If MsgBox("Etes vous sûr de supprimer " & Me.textbox2 & "?", vbYesNo) = vbYes Then
Range(nomtableau).Rows(Me.Enreg).Delete
Me.Enreg = ""
UserForm_Initialize
raz
Me.Enreg = Range(nomtableau).Rows.Count + 1
End If
End If
End Sub