Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: Kutsche am Juni 20, 2024, 15:06:37

Titel: Feld zur Eingabe freigeben
Beitrag von: Kutsche am Juni 20, 2024, 15:06:37
Hallo,

beim Aufruf eines Formulars sperre ich die Eingabe, da es eigentlich bis auf ein Feld nur der Ansicht dient.
Forms!frm_FlaschenDaten.AllowEdits = False 'Eingabe für ganzes Formular sperren
Forms!frm_FlaschenDaten.SpeichernSchliessen.Visible = False 'Schalter ausblenden
Forms!frm_FlaschenDaten.SpeichernWeiter.Visible = False 'Schalter ausblenden
Forms!frm_FlaschenDaten.Rueckgaengig.Visible = False 'Schalter ausblenden

Ich möchte aber das Feld TUEV zur Eingabe zulasse. Wie lautet dafür der Code? Alles was ich ausprobiert habe, war leider erfolglos.

LG Jens
Titel: Re: Feld zur Eingabe freigeben
Beitrag von: PhilS am Juni 20, 2024, 15:39:29
Wenn du AllowEdits=False setzt, dann sind alle Felder gesperrt und es ist nicht möglich einzelne Felder auszunehmen.

Stattdessen musst du für jedes einzelne Steuerelement die Eigenschaften Locked=True und/oder Enabled=False setzten, ausser für das eine Feld, in dem Änderungen möglich sein sollen.
Titel: Re: Feld zur Eingabe freigeben
Beitrag von: Kutsche am Juni 20, 2024, 16:30:15
Hey,

das geht so leider nicht. Ich benutze das dieses Formular auch für die Eingabe aller Werte, aber ohne Anzeige, was in der entsprechenden Tabelle schon steht.

Wie kann man denn beim Aufruf per VBA einzelne Felder sperren. Dann würde ich meinen Code umbauen.

LG Jens
Titel: Re: Feld zur Eingabe freigeben
Beitrag von: PhilS am Juni 20, 2024, 16:45:28
Zitat von: Kutsche am Juni 20, 2024, 16:30:15Wie kann man denn beim Aufruf per VBA einzelne Felder sperren. Dann würde ich meinen Code umbauen.
In dem man die Locked- und/oder Enabled-Eigenschaften entsprechend setzt, so wie oben geschrieben.
Titel: Re: Feld zur Eingabe freigeben
Beitrag von: Kutsche am Juni 20, 2024, 17:01:39
Ich habe den Code jetzt so umgebaut
'einzelne Felder Sperren
Forms!frm_FlaschenDaten.Flaschennummer.Locked = True
Forms!frm_FlaschenDaten.Beschreibung.Locked = True
Forms!frm_FlaschenDaten.InhaltLiter.Locked = True
Forms!frm_FlaschenDaten.InhaltBar.Locked = True
Forms!frm_FlaschenDaten.InhaltMenge.Locked = True
Forms!frm_FlaschenDaten.TUEV.Locked = False
Forms!frm_FlaschenDaten.Liste18.Locked = True
'Schalter ausblenden
Forms!frm_FlaschenDaten.SpeichernSchliessen.Visible = False
Forms!frm_FlaschenDaten.SpeichernWeiter.Visible = False
Forms!frm_FlaschenDaten.Rueckgaengig.Visible = False

Leider etwas aufwendiger, aber so funktionier es, wie ich es haben möchte.

Danke dir
Jens