In einem Kombifeld neuen Wert eingeben

Hallo,

noch eine Frage.

Ich will einem Kombifeld einen Wert eingeben.
Dieser soll in der Tabelle aus der die Werte des Kombifeldes kommen gespeichert werden.

Desweiteren ist das Kombifeld abhängig vom Produkt.
Deswegen hat die Tabelle den Fremdschlüssel Produkt.
Dieser sollte in der Tabelle auch noch erscheinen.

Habe folgenden Code gefunden der allerdings nicht funktioniert.

Private Sub Kombinationsfeld13_NotInList(NewData As String, Response As Integer)
Dim sql As String
sql = („INSERT INTO tblEigenschaft (Eigenschaft) SELECT '“ & NewData & „’“ AS Eigenschaft;")
DoCmd.RunSQL sql
Response = acDataErrAdded

End Sub

Ich hoffe mir kann jemand weiterhelfen

Gruß Franz

Hallo Franz,

noch eine Frage.

ja, habe ich auch: welches Access nutzt du?

Denn deine Wünsche sind z.B. in Access 2007 super einfach integriert.

Habe folgenden Code gefunden der allerdings nicht
funktioniert.

logisch

Private Sub Kombinationsfeld13_NotInList(NewData As String,
Response As Integer)
Dim sql As String
sql = („INSERT INTO tblEigenschaft (Eigenschaft) SELECT '“
& NewData & „’“ AS Eigenschaft;")

warum steht der SQL-String in Klammern? Das kann nicht funktionieren.
Frage: welchen Datentyp hat dein neuer Wert?
Bei Zahlen, müssen die Apostrophen weg!

DoCmd.RunSQL sql
Response = acDataErrAdded

End Sub

BITTE: immer die Access Version mit angeben, denn die Unterschiede können gravierend sein!

Grüße aus Rostock
Wolfgang
(Netwolf)

Hallo,

habe Access 2007,

könntest du mir bitte noch sagen, wo dort die Funktionen integriert sind.
Vielen Dank nochmals

Gruß

Franz

Hallo,

habe Access 2007,

das ist doch schon mal gut

könntest du mir bitte noch sagen, wo dort die Funktionen
integriert sind.

klar:
-> Rechtsklick auf das Kombifeld
-> Eigenschaften
-> Reiter [Daten]
-> Nur Listeneinträge = JA
-> Wertlistenbearbeitung zulassen = JA
-> Bearbeitungsformular für Listenelemente = erstelle ggf. ein eigenes Formular dafür

schalte um in die normale Formularansicht.

  • Kombifeld
  • klicke den Pfeil rechts an um die Liste auszuklappen
  • unterhalb der Liste siehst du nun links unten ein neues Symbol
  • klick mal drauf :smile:

Grüße aus Rostock
Wolfgang
(Netwolf)

Hallo Wolfgang,

tut mir Leid ,
aber wenn ich auf das neue Feld klicke passiert nichts und ich kann auch keinen neuen Wert eingeben.

Wie sollte es denn dann weitergehen?

Mit freundlichen Grüßen

Franz

Hallo Franz,

tut mir Leid ,
aber wenn ich auf das neue Feld klicke passiert nichts und ich
kann auch keinen neuen Wert eingeben.

du hast ein Formular für die Bearbeitung der Feldwerte erstellt?

Du hast nicht zufällig Wertliste als Quelle dort stehen?

Grüße aus Rostock
Wolfgang
(Netwolf)

Hallo Wolfgang,

habe es hinbekommen mit einem extra Formular. Vielen Dank.

Aber, dass man einfach einen Wert in das Kombifeld schreibt auf Enter drückt und fertig geht nicht so ohne weiteres Oder?

Gruß Franz

Hallo Franz,

habe es hinbekommen mit einem extra Formular. Vielen Dank.

das freut mich

Aber, dass man einfach einen Wert in das Kombifeld schreibt
auf Enter drückt und fertig geht nicht so ohne weiteres Oder?

das geht auch, wie du schon als Code hattest. Du hast damit nur den Nachteil, dass alles automatisch in die Tabelle geschrieben wird.
Du hast dann auch keine Korrektur/Edit Möglichkeit.

Ich habe eine Funktion NIL (Not in List) programmiert, womit ich
direkt in die Tabelle schreibe.

Grüße aus Rostock
Wolfgang
(Netwolf)