Access Eingabeformular nur mit relevanten Spalten

Ich gehe davon aus, dass du die Namen deiner Steuerelemente kennst. Dann kannst du folgendes im Ereignis "Nach Aktualisierung" des Bauteil-Steuerelements reinschreiben (für den Fall dass das Steuerelement auch Bauteil heißt):

Private Sub Bauteil_AfterUpdate()  'Zuerst alle unsichtbar:  With Me    !RohrFitting1.Visible=False    !RohrFitting2.Visible=False    !RohrFitting3.Visible=False    '... usw.  End With
  Select Case Me!Bauteil.Value '"Bauteil" = Name des Steuerelements  Case "Rohr"    With Me      !RohrFitting1.Visible=True      !Flansch1.Visible=True      !Bund1.Visible=True      !Flansch2.Visible=True      !Bund2.Visible=True    End With  Case "Reduzierstück"    With Me      !RohrFitting1.Visible=True      !Flansch1.Visible=True      !Flansch2.Visible=True    End With  Case "..." 'usw.    End SelectEnd Sub
(Luftcode)

Gruss - Peter

Hallo,

danke für die Erklärungen.

Ich bin mir gerade jetzt nicht ganz sicher, ob es für meinen Anwendungsfall nun nicht sinnvoll oder nicht möglich ist ?! Bevor ich mich dann nun in die Ereignisprozeduren einarbeiten möchte ich dann erst klären, ob sich der Aufwand lohnt

Deshalb versuche ich das Ganze nochmal Bildlich darzustellen.





Dies ist nun mein Max Case. Die ersten 4 Punkte (ID, Auftragsnummer, Kundenauftrag und Bauteil) sollen immer angezeigt werden und die Zeilen darunter mit zwei Spalten, sind abhängig von der Auswahl in der Liste "Bauteil". Idealerweise würden nur noch die
benötigten Zeilen unterhalb angezeigt werden, sobald man auf ein Element klick. (Man könnte aber auch den "Filtern" -Button nutzen.)

Beispiel:

Auswahl "Rohr" - Zeilen 1 + 5 + 6 +7 + 8 werden angezeigt

Auswahl "Reduzierstück" - Zeilen 1 + 5 + 7 werden angezeigt

Auswahl "T-Stück" - Zeilen 1 - 11 werden angezeigt

Dieses Formular soll also wirklich nur für die Eingabe genutzt werden um den Datensatz in die Datenbank zu schreiben. Für mich wäre dies dann ein Einzelblattformular. Die gesamten Datensätze kann sich der Nutzer dann in der Datenbank selber ansehen.

Ich könnte das Ganze auch einfacher für mich lösen und einfach x-beliebig verschiedene Formulare erstellen entsprechend des Bauteil-Typs. Dort würden dann wie in den Beispielen dargestellt nur die entsprechenden Zeilen stehen. - Das ist aber nicht so
Bedienerfreundlich und nicht so "elegant"

Viele Grüße,

Christian

Hallo,

1. Was ist ein Einzelblattformular. Ich habe es mit dem Formular-Assistenten erstellt ... Wie kann ich erkennen, ob es das ist?

Auf einem Einzelblattformular wird ein einzelner Datensatz mit seinen Feldern dargestellt. Um zum nächsten Datensatz zu wechseln, muss man blättern. Im Endlosformular oder Datenblatt wird eine Liste von Datensätzen angezeigt, deren Felder in einer Zeile
nebeneinander stehen. Durch die Listenform verbietet sich dein Vorhaben, da die Datensätze unterschiedliche Bedingungen haben können, und wenn manche Felder ausgeblendet wären, würde das für die gesamte Spalte gelten.

2. Wie würde ich vorgehen um ein Macro für ein Feld zu erstellen?

Gehen wir vom Einzelformular aus, sowie, dass die Felder für Bauteil und Bauform genauso heißen, kannst du im Ereignis Nach Aktualisierung von Bauteil und Bauform eine Ereignisprozedur anlegen und in dieser Code wie den folgenden eingeben:

Private Sub Bauteil_AfterUpdate()

If Me!MeinAnderesFeld.Visible = False 'oder True, je nach Bedingung

...

End Sub

Das noch tiefer zu erklären würde den Rahmen hier sprengen. Es gibt YouTube-Videos zu dem Thema, sowie die Nordwind-Beispiel-DB, von der man abschreiben kann.

Gruss - Peter

Hallo,

vielen Dank schon mal für die Antwort.

Leider arbeite ich nun das erste Mal mit Formularen und mit VBA in Access. Ich habe schon einige Erfahrung in Excel, jedoch weiß ich bei Access nicht genau wie ich das oben beschrieben bewerkstellige.

1. Was ist ein Einzelblattformular. Ich habe es mit dem Formular-Assistenten erstellt ... Wie kann ich erkennen, ob es das ist?

2. Wie würde ich vorgehen um ein Macro für ein Feld zu erstellen?

Gruß,

Christian

Hallo,

Felder sichtbar/unsichtbar machen geht per VBA mit der .Visible-Eigenschaft, auch zur Laufzeit.

Me!DeinSteuerelement.Visible = True 'oder False

Sinnvoll ist das aber nur im Einzelblattformular, nicht in Endlos- bzw. Datenblattansicht. Bei letzterem wäre es die Eigenschaft

Me!DeinSteuerelement.ColumnHidden = False 'oder True

Gruss - Peter