Office: (Office 2016) Autowert per VBA erhöhen und speichern

Hallo,

ich möchte beim Öffnen eines Formulars gerne einen Datensatz erzeugen.
Hierzu verwende ich folgenden VBA-Code:

CurrentDb.Execute "insert into tbl_Autowert (ID, User, Datum, Uhrzeit) " & _
"Select XX, fncUserName(), Date(), Time()"​

Ich möchte gerne, dass in dem Feld ID, welches als "Autowert" formatiert ist, automatisch mit dem nächsthöheren Wert gefüllt wird.
Kann mir jemand weiterhelfen, was ich nun in der Select-Anweisung (XX) dafür schreiben muss?

Schon mal vielen Dank im voraus!

 

Hallo,
Autowert ist Autowert, den kann man nicht manipulieren.
Der zählt sich ganz von alleine hoch.
Bitte lese Dir nochmal die SQL-Anweisungen bezüglich Datum und Zeit durch, denn Deine nicht vorhandene Formatierung in dem "INSERT INTO"-String wird so nicht funktionieren.

 

Ja, ich habe das jetzt mit einer Schaltfläche und einem simplen:
DoCmd.RunCommand acCmdSaveRecord
gelöst... funktioniert auch :-)

 

Noch eine Frage, die zwar nur indirekt zu dem Thema gehört.
Wie gesagt funktioniert soweit alles richtig, wie ich es mir vorstelle. Allerdings bekomme ich beim Öffnen des Formulars jetzt folgende Fehlermeldung:

Sie können die offene Datenbank nicht komprimieren, indem Sie ein Makro oder Visual Basic Code ausführen.

Diese Meldung kann man zwar ohne Probleme wegklicken, aber es wäre natürlich schöner, wenn keine Fehlermeldung kommt - zumal ich auch nicht verstehe warum. Ich habe gar nichts an der Komprimierung gemacht.
Leider hilft es auch nicht ein " DoCmd.SetWarnings False " zu ergänzen...

Woran könnte das liegen und wie kann ich die Fehlermeldung ausschalten?

Danke und viele Grüße!

 

seit wann kommt die Fehlermeldung?
Setz doch mal eine Haltemarke in den Code, der beim Öffnen des Formulars ausgeführt wird und checke mit F8, wo er hängen bleibt.

 

Ich habe gerade meinen Code umgebaut... jetzt kommt die Fehlermeldung nicht mehr.
Ich glaube es lag an der Funktion "environ", die ich verwende... im Formular selbst funktioniert diese Funktion, aber scheinbar nicht beim Springen von einem Formular ins nächste...