Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

"Einfach" einen Wert in eine Access-Tabellen in VBA schreiben

Begonnen von Janosch, Januar 10, 2020, 22:34:51

⏪ vorheriges - nächstes ⏩

Janosch

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


Hondo

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

Janosch

Genau sowas habe ich gesucht und nicht gefunden. Vielen Dank!

Grüße,
Jan