Discussion :

[DamKre]

Bonjour.

Je cherche à supprimer, en VBA, tous les enregistrements d'une table ( il s'agirait d'une procédure d'effacement de données que je souhaite intégrer ). En clair, après un message d'avertissement ( ce message, j'arrive à le faire ), si l'utilisateur a choisi "Oui", Access supprimera les données de sa table.

Comment faire cela en VBA?

Merci de vos réponses...

( PS : J'ai déjà cherché dans les forums, FAQ, ..., et, à moins d'une erreur, je n'ai pas trouvé ce que je désirais...)

[Gabout]

Bonjour,

Ceci devrait faire l'affaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
        Dim bReponse As Byte
    bReponse = MsgBox("Voulez-vous effacer ?", vbDefaultButton2 + vbQuestion + vbOKCancel, "Effacement")
    If bRep = vbOK Then CurrentDb.Execute "Delete * FROM MaTable"

[Gabout]

Par ailleurs tu aurais pu trouver ce lien :

http://access.developpez.com/faq/?pa...le#DeleteTable

Bon courage,

[DamKre]

Re,

Oui, en effet... Cela m'a échappé...

Merci