Office: (Office 2016) Listenfeld mit Mehrfachauswahl

Eine kurze Anmerkung hätte ich.
Ist mit dem Checkboxen zu arbeiten statt der markieren der teile viel aufwändiger. Denn wo ich geschaut hatte wurde das einbauen der Checkboxen immer abgeraten, da es kompliziert sein soll.

Habs je selbst auch versucht aber nicht ganz geschafft. Ist das echt so kompliziert oder finde ich die richtigen Methoden/Seiten nicht?

 

Servus oeztuerk_42,
es geht weniger um die Komplexität des Programmierens, als um die Flexibilität bei dem Auftauchen neuer Parameter.
Bei Checkboxes musst du richtig heftig in das Design der Checkboxes im Entwurfsmodus und im Progammcode eingreifen.
Stell Dir mal vor, dass das jemand 3 Jahre, nachdem Du geistig das Programm verlassen hast von Dir eine Erweiterung um einen Parameter bittet (1 Checkbox mehr).
Mit Listenfeldern und dahinter sitzenden Tabellen, ist so etwas ohne zusätzliche Programmierung möglich.

 

Ok Danke für die Info Ohrkester *Smilie

 

Hi,
Active-X Listviews haben Checkboxen.

Ich habe mir mal deine Demo-DB angeschaut:
1.) Option Explicit fehlt !
Wäre das da, würde z.B. auffallen, dass du im Code str_Kennwort dimensionierst, dann aber einen Schreibfehler einbaust beim Verwenden,
str_KennEwort

2.) die ganzen DLookups sind natürlich Quark ! Würdest du im Kombi der Projekte die ID mit in die Datensatzherkunft dazunehmen (so wäre es eigentlich richtig, den PK zu verwenden), könntest du dir dieses DLOOKUP- Gedöns sparen

3.) Docmd.Menü Befehle sind eigentlich obsolet und solltest du vermeiden.

 

Hi,
Active-X Listviews haben Checkboxen.

Ich habe mir mal deine Demo-DB angeschaut:
1.) Option Explicit fehlt !
Wäre das da, würde z.B. auffallen, dass du im Code str_Kennwort dimensionierst, dann aber einen Schreibfehler einbaust beim Verwenden,
str_KennEwort

2.) die ganzen DLookups sind natürlich Quark ! Würdest du im Kombi der Projekte (und auch in den anderen Kombis) die ID mit in die Datensatzherkunft dazunehmen (so wäre es eigentlich richtig, den PK zu verwenden), könntest du dir dieses DLOOKUP- Gedöns sparen

3.) Docmd.Menü Befehle sind eigentlich obsolet und solltest du vermeiden.
4.) wenn du 2x den gleichen Code in das IF und das ELSE der Bedingung setzt, dann kannst du dir 1x die Zeilen sparen und den Code außerhalb der Bedingung schreiben
Code:

 

Im übrigen ist der Forms! Ausdruck zu ersetzen durch:
Me.Filter = "blahblah"
Me.FilterOn = True

 

ja genau aber weis nicht wie ich die benutzen soll

Danke nochmal für deine Infos. Die Punkte habe ich schon bearbeitet.

 

Ich hatte in mein Code eine abfrage mit der ich überprüft hatte ob ein Feld bereits existiert. Nun aber da ich jetzt mehrere elemente auf einmal einfügen kann klappt es mit der überprüfung nicht.
Mit der abfrage hatte ich Einzelteile überprüft:
Code:

Wisst ihr vielleicht wie ich beim Code vom Kyron9000 so aufbauen kann damit die Überprüfung auf gleiche FehlteilNr richtig ausgeführt wird.

 

Warum verwendest du nicht deine Primärschlüssel ?
Hiermal die Überarbeitung deines Erstenwurfs.

Den Code von Kyron habe ich dir ergänzt, teilweise verändert.

Den müsste man nochmal genauer bzgl. Fehlerhandling übearbeiten.

 

Meinst du das so
Code:

und in kmb_FehlteilNr sol die id gespeichert werden?

 

Kann ich in vba so machen das ein wert von einer select answeisung in eine variable gespeichert wird?

ich habe hier eine select Anweisung:
Code:

damit möchte ich Filtern und in die variable "za" reinspeichern. Wenn ich das hinbekomme sollte es eigentlich klappen.
in vFehlteilNr ist folgendes gespeichert:
Code:

 

Es wird doch sowieso die ID gespeichert. Die erfragst du doch umständlicherweise über DLookup.

Die ID wird in den Kombis/Listen vorgeschaltet und direkt aus den Kombis bezogen.

in der n:m-Tabelle werden doch auch nur die FK's gespeichert.

Siehe meinen vorletzten tweet, da ist deine DEMO als Anhang.

Dort habe ich das so geändert, dass die ID's aus den KOmbis verwendet werden.

Deine Prüfung ist auch eingebaut. Das Fehlerhandling allerdings nicht ganz sauber.

Zusätzlich kannst du in deiner Tabelle einen Index setzen, der Doppelungen der KOmbinationen schon in der Tabelle verhindert.
Ich habe meinen Upload nicht besonders ausgiebig geprüft, aber der ergänzte Teil der Prüfung sollte nachvollziehbar sein.

 

Ups hattes es gernicht gesehen, Vielen Dank ich schau es mir jetzt an *Smilie

 

Ich habs wieder gelöscht.
Ich habe da ein Fehler drin gehabt.

Ich lade es dir gleich nochmal korrigiert hoch.

 

ja weil bei der Überprüfung gabs ein Problem oder ? Es hat nur überprüft ob die Fahrzeuge gleich sind