Windows XP: Access VBA - erkennt Zellenwert nicht

hi,

würde gerne mit vba in access zwei Zellenwerte angucken und falls beide leer sind => löschen lassen... dazu habe ich folgenden Code geschrieben der einfach nicht funzt... =(
 
Dim rs As DAO.Recordset
Dim i As Integer
Dim db As Database

[...]

Set rs = CurrentDb.OpenRecordset("meine Tabelle", dbOpenDynaset)

rs.MoveFirst

i = 1

Do Until rs.EOF = True
If rs![Spalte-Nummer] = "" And rs![Name] = "" Then
    rs.Delete
End If
i = i + 1
rs.MoveNext
Loop

[...]



für jeden tipp bin ich super dankbar

Grüße
Benni
Mein Computer-System:
   
Mein PC ist etwa 0-2 Jahre alt.


Letze Aenderungen bevor der Fehler auftrat:

Ich habe neue Software installiert: