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:
bennn Gast |