Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Janosch am Januar 10, 2020, 22:34:51

Titel: "Einfach" einen Wert in eine Access-Tabellen in VBA schreiben
Beitrag von: Janosch am Januar 10, 2020, 22:34:51
Hallo liebe Mitleser!
Ich habe mich redlich bemüht eine Antwort zu finden aber alle Antworten die Google ausspuckt sind 2 Jahre und älter. Ich hoffe es gibt inzwischen einfachere Wege.
Ich benutze Access aus dem Office365.

Ich habe eine Tabelle mit 2 Spalten (ID und Wert).
Den Wert kann ich einfach einlesen mit
myWert = DLookup("[Wert]", "tbl_Einstellungen", "[ID] = 2")
da mir die ID bekannt ist.
Gibt es einen ähnlich einfach Weg einen neuen [Wert] in die Tabelle zurück zu schreiben?
Ich will nichts sortieren, filter, hinzufügen oder sonst was.

Grüße,
Jan

Titel: Re: "Einfach" einen Wert in eine Access-Tabellen in VBA schreiben
Beitrag von: Hondo am Januar 10, 2020, 22:52:39
Ja gibt es
Wenn die ID bekannt dann geht das so:
Dim myWert As String
Dim myID As long
myWert = "Irgendwas"
myID = 2
Currentdb.Execute "Update tbl_Einstellungen set Wert='" & myWert & "' Where ID=" & myID

Falls Wert kein Textfeld ist, sind die einfachen Hochkommatas zu entfernen und in der Deklaration entsprechend der Typ zu ändern.
Geht natürlich auch als Einzeiler - hier ist Wert vom Typ Zahl:
Currentdb.Execute "Update tbl_Einstellungen set Wert=4711 Where ID=2"
Gruß Andreas
Titel: Re: "Einfach" einen Wert in eine Access-Tabellen in VBA schreiben
Beitrag von: Janosch am Januar 11, 2020, 09:42:51
Genau sowas habe ich gesucht und nicht gefunden. Vielen Dank!

Grüße,
Jan