Office: (Office 2016) Werte aus Endlosformular je Datensatz in Tabelle ergänzen

Das Feld "Schicht" ist doch auch nicht selbst im Formular enthalten und erhält in der Tabelle den Wert aus dem Formular über das Feld cmbSchicht

Me.Schicht = Me.cmbSchicht.Column(1)


*grübel*

 

Was denkst du worauf sich Me. bezieht ???

Du weist doch den Wert aus dem Kombi einem Steuerelement zu (sprich einem Feld auf einem Formular ) und nicht der Tabelle.
Der Wert wandert in die Tabelle, weil das Steuerelement an das Tabellenfeld gebunden ist.

 

Theoretisch stimme ich Dir zu ... aber wo ist denn dann das Feld Schicht in Vergleich dazu im Formular ?

 

Ich verstehe die Frage nicht.
Dein Feld Schicht in der Tabelle korrespondiert mit einem Formularfeld.
Dabei kann der Name des Steuerelements ein anderer sein das spielt keine Rolle.
Der Steuerelementinhalt ist aber identisch mit dem Namen des Tabellenfeldes.
D.h. dein Feld kann ctlSchicht heißen, sobald es aber den Steuerelementinhalt Schicht aus der Tabelle (Datenherkunft des Formulars) hat, wird der Wert dort geschrieben.

 

Oh jetzt hab ich's geschafft es richtig einzustellen.
Ich DANKE Euch für Eure Hilfe !

 

Hallo noch mal,

ich brauch bitte doch noch mal Eure Hilfe.
Und zwar soll beim Drücken des FERTIG-Kästchens das die Werte NUR DANN in die Tabelle geschrieben werden, WENN in ALLEN genannten Feldern ein Wert steht. Falls nicht soll die unten genannte Message-Box angezeigt werden.

Irgendwie klappt das mit meinem Code irgendwie nicht so ganz wie es soll.


Code:

 

Hat jemand vielleicht noch eine Idee wo der Fehler liegt ?

 

Hallo,
mit If muss jede Bedingung vollständig sein.
Code:

Oder besser gleich so:
Code:

 

Hallo Klaus,

meinst Du so ?

If IsNull(Nz(Me.Schichtkonstellation)) Or (Nz(Me.Schicht)) Or (Nz(Me.Kontrolleur)) Or (Nz(Me.SchichtTeamleiter)) Or (Nz(Me.Mitarbeitermenge)) Then

 

Hallo,
sorry, mit IsNull() ist natürlich das Nz überflüssig, habe ich nicht aufgepasst.
Wenn dann so:
Code:

 

Wenn ich das so eingeb' werden die Tabellenfelder nicht befüllt, da angeblich mindestens eines der Felder nicht befüllt sein soll, obwohl es alle Felder sind.

 

Hallo,
Deinen Satz verstehe ich nicht.

 

Also, trotz das alle betreffenden Kombifelder im Formular mit einer Auswahl versehen wurden, kommt die Meldung (MsgBox) das nicht alle befüllt seien.

Code:

 

Der Code macht in der Prüfung der Zielfelder gar keinen Sinn...
Bevor die Felder überhaupt ihren Wert zugewiesen bekommen, prüfst du auf deren Inhalt ??

Du wolltest wohl eher die Auswahlen in den Kombifeldern prüfen, aber nicht die Zielfelder, oder ?
Im übrigen würde ich eher NZ() verwenden, um 2 Zustände zu prüfen, nämlich den Isnull Zustand und auf einen Ersatzwert z.b. Leerstring.

 

Also, ich möchte das ALLE Werte aus den Kombifeldern, WENN in diesen auch eine Auswahl getroffen wurde (sowie im Feld "Vermerk"), in den jeweiliegen Datensatz der betreffenden Felder geschrieben wird wenn ich das Fertig-Häckchen drücke und dieses auf WAHR setze. Hierzu ist es unbedingt erforderlich das alle Kombifelder einen ausgewählten Wert erhalten, falls nicht soll die MsgBox erscheinen.

Im Gegenzug sollen beim erneuten Klicken des Fertig-Häckchens (falsch) die vorher in den jeweiligen Datensatz geschriebenen Daten wieder gelöscht werden.

Ich hoffe das ich es nun nachvollziehbarer beschrieben haben.