Les requêtes Access en VBA

Bonjour à tous.
Voila mon problème, qui pourrai ne pas en être un pour certains.
Soyez indulgeant :)
Je voudrais savoir comment effectuer une suppression dans un etable access à partir d'une comparaison faite avec une autre table.
Concrètement, j'ai une table avec des informations sur des personnes et je voudrais supprimer les informations concernants ces personnes lorqu'elles apparaissent dans une autre table.

J'ai essayé avec les requêtes simplement mais pas moyen.

Je me suis donc tourner vers le module VBA d'Access.
Il faut aussi savoir que je ne souhaite pas passer par un formulaire.

Voila ce que je sais :

Dim rs As Recordset
Dim RS2 As Recordset
Dim db As Database


Set db = Application.CurrentDb
Set rs = db.OpenRecordset("table_all", dbOpenTable, dbReadOnly)
Set RS2 = db.OpenRecordset("table", dbOpenTable, dbReadOnly)

rs.MoveFirst
While Not (rs.EOF)
RS2.MoveFirst
While Not (RS2.EOF)
If rs.Fields("n_client") = RS2.Fields("n_client2") Then
// c'est ici que je veus mettre la requete : DELETE *
//FROM table_all WHERE n_client=RS2.Fields("n_client2");
End If

RS2.MoveNext
wend
rs.MoveNext
Wend

Merci d'avance pour votre aide et je sais aussi qu'il ne faut pas mettre les recorset en dbReadOnly, mais je sais plus comment il fo mettre :(
Merci , et c'est assez urgent