Bonjour,

J'espère que vous n'aurez pas besoin d'un model pour trouver la réponse a mon problème.
J'ai créer un formulaire pour faire tout plein de truc sur un de mes tableaux

Je voudrai pouvoir supprimer un enregistrement lorsque je le consulte.... mais voila cela ne fonctionne pas, certainement un problème de "vocabulaire"

Le code bloque sur Selection.Entire.Delete

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub btmSupprimer_Click()
 
Dim r As Integer
 
r = MsgBox("Voulez vous confirmer la suppression de cette entreprise de sous traitance ? ", vbYesNo, "Sous_Traitant")
 
    If r <> 6 Then Exit Sub
        Selection.EntireRow.Delete
 
End Sub
D'avance merci pour le temps pris a lire ce message