Supportnet / Forum / Datenbanken

hallo leute brauche dringend hilfe habe in einem formular 2 kombifelder aber ich kann keinen neuen datensatz hinzufügen wie mache ich das? in der hilfe habe ich nur gefunden "Bei Nicht In Liste-Eigenschaft und das NotInList-Ereignis verwenden." aber wie???? ich bin anfänger bitte hife danke

Grüezi

Kommt darauf an, wie die Kombifelder verwendet werden, woher die angezeigten Daten stammen.
Vielleicht hilft Dir schon, in den Eigenschaften / Daten / Nur Listeneinträge auf Nein zu setzen.

Wenn diese Option aber auf Ja bleiben muss, wäre das eine Möglichkeit:

Private Sub Kategorie_NotInList(NewData As String, Response As Integer)
Dim dbCurrent As Database
Dim RS As Recordset
Dim intMsgResponse As Integer

´Nachfragen, ob der neue Wert gespeichert werden soll...
intMsgResponse = MsgBox("Möchten Sie ´" & NewData & "´ zur Liste hinzufügen?", vbOKCancel + vbQuestion + vbDefaultButton2, "Kategorie hinzufügen?")
    If intMsgResponse = vbOK Then
    
        ´Tabelle öffnen und mit der AddNew-Methode den Eintrag speichern....
        Set dbCurrent = CurrentDb
        Set RS = dbCurrent.OpenRecordset("Adressen", dbOpenDynaset)
        With RS
            .AddNew
            !Kategorie = NewData
            .Update
            
            RS.Close
        
        End With
        ´Das Kombinationsfeld zum Requery veranlassen und den neuen Wert
        ´auch automatisch auswählen lassen.
        Response = acDataErrAdded
    Else
        ´Meldung, wenn auf Abbrechen geklickt wurde.
        Response = acDataErrContinue
        MsgBox "Sie können ´" & NewData & "´ nicht verwenden, wenn Sie den Wert nicht speichern.", vbExclamation, "Akquisitions-Datenbank"
    End If

End Sub
 

Dabei handelt es sich im Beispiel um ein Feld "Kategorie" aus der Tabelle "Adressen".
Musst Du halt anpassen.

Gruss
Köbi

hallo kölbi

klappt leider nicht
die kombinationsfelder habe ich aus 2 abfragen erstellt und zwar aus e i n er tabelle und ich kann damit die werte aus einer tabelle einsehen. aber wie gesagt bin ich leider anfänger und komme damit nicht klar bin schon verzweifelt kannst du mir das ganze noch einmal erklären?

vielen dank

n´Abend

Ich merke nicht recht, was Du mit den Kombifeldern machen willst. Einen ganzen Datensatz neu einfügen? Das geht nicht.

Kannst Du näher beschreiben, was Du Dir vorstellst?

Gruss
Köbi

hallo
wollte eigentlich nur dem formular neue einträge hinzufügen aber seit ich die einträge über 2 kombifelder einsehe geht das nicht mehr
gibt es ev. eine andere variante artikel von 2 versch. firmen in einem formular anzeigen zu lassen?

danke

Hallo

Nun ist die Verwirrung komplett. Wenigstens bei mir. Aber ich bin ja auch kein Hellseher.

Wenn Du willst, kannst Du mir die DB mal schicken, aber bitte nur mit wenigen Beispieldaten und gezippt.


jahau(at)gmx.ch

Gruss
Köbi

Hallo Gero,
bin selber auch kein Profi aber ich Versuchs mal mit am Beispiel.
Ich geh davon aus das du z.B. eine Datenbank machst in der du Lampen und Tisch (Tabelle Artikel) von Verschieden Herstellern IKEA,… (Tabelle Hersteller) verwalten willst.
Zum Anzeigen möchtest du ein Formular haben in dem du nach Lampen Selektierst und in einem Unterformular die Hersteller samt Artikel + Preis +… angezeigt bekommst.

Als ersten Schritt die Tabellen (T1)Artikel und (T2)Hersteller erstellen und mit Daten füllen. Primärschlüssel setzen.
Anschließend erstellst du eine weitere (T3)Tabelle, bindest die Tabellen (1) und (2) als nachschlage Felder (Nachschlage-Assistent) ein. Der Assistent wird gestartet und du sagst Werte aus Tabelle. Wenn du noch einen Preis Verwalten möchtest neue Spalte mit Preis erstellen.

Als nächstes definierst du die Beziehungen der Tabellen 1:n

Im Anschluss erstellt´s du dir ein Formular (F1) für die Anzeige von Hersteller, Artikel und Preis, Datenherkunft ist die (T3).

Zum „Filtern“ Erstellst du ein weiteres Formular (F2) Datenherkunft (T1). Bei den Tools findest du eine Schaltfläche für Unterformular. Anklicksen und Rahmen in (F2) aufziehen, Datenherkunft ist F1.

Möchtest du ein Bett einfügen muss dies in der (T1) passieren

Wenn du magst kann ich dir die Datenbank zum nachvollziehen Mailen.

Gruß Jürgen

hallo jürgen

vielen dank ich werde versuchen das so hinzukriegen

wenn du mir die datenbank schicken möchtest wär das super an gero_jensen@yahoo.de

danke schon jetzt

gero

• hinzufügen meiner Web in der Google
• kann musik nicht hinzufügen
• Startmenü - Verkn. Videos hinzufügen
• Hinzufügen einer Anwendung zu Bachtrach