Update einer Tabelle

Hallo zusammen,

ich habe eine Tabelle (Tabelle1) mit den Feldern Land und Selektion.
Das Feld Selektion ist ein Kontrollkästchen (Ja/Nein).

Dieses Feld (Selektion) will ich nun mittels eines VB Kommandos für alle Datensätze füllen. Ich habe schon mal das folgende geschrieben:

Private Sub Befehl5_Click()
On Error GoTo Err_Befehl5_Click

DoCmd.RunSQL „Update Tabelle1 SET Selektion = ‚-1‘ WHERE Selektion = ‚0‘“

Exit_Befehl5_Click:
Exit Sub

Err_Befehl5_Click:
MsgBox Err.Description
Resume Exit_Befehl5_Click

End Sub

Dummerweise kommt als Fehlermeldung immer: Dateitypen in Kriterienausdruck unverträglich.

Kann mir da jemand helfen?

Gruß
Werner

Holla.

DoCmd.RunSQL „Update Tabelle1 SET Selektion = ‚-1‘
WHERE Selektion = ‚0‘“

Dummerweise kommt als Fehlermeldung immer: Dateitypen in
Kriterienausdruck unverträglich.

Das Feld „Selektion“ ist ein boolescher Ausdruck. Das sollte man nicht mit einem String zu füllen suchen …

Außerdem gibt es eine bessere Methode als „DoCmd.RunSQL“.

Also

CurrentDB.Execute "Update Tabelle1 SET Selektion=True"

sollte das eigentlich tun. Die WHERE-Klausel kannst Du Dir für die vorliegende Aufgabenstellung eigentlich schenken.

Gruß Eillicht zu Vensre