Access-o-Mania

Access-Forum (Deutsch/German) => Formular => Thema gestartet von: AlphaAvenue am Januar 07, 2022, 17:18:15

Titel: Endlosformular mit bestimmten Datensätzen öffnen
Beitrag von: AlphaAvenue am Januar 07, 2022, 17:18:15
Ich habe eine Tablle Einnahme_TAB, es ist Datensatzherkunft für das Formular Einnahmen_FORM.
nun möchte ich eine Möglichkeit schaffen ein Listenformular EinnahmeListe_FORM zu öffnen in dem alle Datensätze angezeigt werden sollen die einer bestimmten Einnahmenart entsprechen. Es gibt eine Tabelle Einnahmenart_TAB die aus den Feltern ArtBezeichnung und EA_ID (AutoWert) besteht Ich bastel hier schon seit Stunden und es geht einfach nicht. Es gibt ein Formular in dem ein KombiFeld "Auswertung" enthalten ist und per Abfrage auf das Kobifeld die Arten ausgibt. Das Formular ist bis jetzt an keine Datensatzherkunft gebunden sondern enthält nur verschiedene Kombifelder (SELECT EinnahmenArt_DTAB.Einnahmenart, EinnahmenArt_DTAB.EA_ID FROM EinnahmenArt_DTAB ORDER BY EinnahmenArt_DTAB.Einnahmenart; )

Danke Euch!
Titel: Re: Endlosformular mit bestimmten Datensätzen öffnen
Beitrag von: Beaker s.a. am Januar 07, 2022, 18:37:00
Hallo,
Warum das vorhandene Form nicht einfach filtern?
Private Sub DeinAuswahlDerEinnahmeArtKombi_AfterUpdate()
    Me.Filter="EinnahmeArtID_F = " & Me.DeinAuswahlDerEinnahmeArtKombi
    Me.FilterOn = True
End Sub
Oder ein UFo einbauen
Private Sub DeinAuswahlDerEinnahmeArtKombi_AfterUpdate()
    Me.DasUFoControl.Form.RecordSource = _
      "SELECT Feldliste " _
    & "FROM Einnahme_TAB " _
    &  "WHERE EinnahmeArtID_F = " & Me.DeinAuswahlDerEinnahmeArtKombi
End Sub
Oder einfach ein Listfeld. Im gleichen Ereignis w.o. nur die erste Zeile
ändern
Me.DasListfeld.RowSource = _Der Filter lässt sich natürlich mit weiteren Parametern (z.B. Zeiträume)
noch erweitern.

gruss ekkehard

edit: Alles natürlich mehr oder weniger Luftcode