Neuigkeiten:

Ist euer Problem gelöst, dann bitte den Knopf "Thema gelöst" drücken!

Mobiles Hauptmenü

Gesamtanzahl Datensätze im UF aktualisieren

Begonnen von Tigra1207, Juli 17, 2011, 23:47:35

⏪ vorheriges - nächstes ⏩

Tigra1207

Hallo, ich habe eine Frage:

in einem Formular habe ich ein Kombifeld und nach Auswahl erscheinen im UF die ausgewählten Datensätze.

Nun möchte ich die Anzahl der Datensätze in einem Textfeld als Summe zeigen. Leider aktualisiert sich das nicht automatisch nach Auswahl im Kombifeld. Kann jemand helfen?

Code:

Im HF beim Anzeigen eine Ereignisprozedur:

Private Sub Form_Current()


Me!Text13 = Me![Unterformular Fragpo].Form.RecordsetClone.RecordCount

End SubPrivate Sub Form_Current()


Me!Text13 = Me![Unterformular Fragpo].Form.RecordsetClone.RecordCount

End Sub


Danke

Gruß Marco

database

Hallo,

ZitatIm HF beim Anzeigen eine Ereignisprozedur

Nimm mal das Ereignis Form_Current des Unterformulars, hier ändern sich die Datensätze.

Alternativ könntest du auch das Ereignis Kombifeld_AfterUpdate dazu verwenden.

Form_Current des HF ist m.E. deshalb wirkungslos, da sich bei der Auswahl keine Datensatzänderung im HF ergibt.

Tigra1207

Danke für die schnelle Antwort, klappt super jedoch:

Ich muss im Kombifeld 2x auf das Oberthema drücken. Beim ersten mal klicken erneuern sich nur die Datensätze und beim 2. mal raufklicken aktualisiert sich erst das Textfeld mit der Anzahl der Datensätze im UF.

Hast du da evtl. ne Lösung für, dass ich nicht 2x klicken muss?

Danke

DF6GL

Hallo,

schreib einfach mal in den Steuerelementinhalt des Textfeldes "Text13" dieses:

=Anzahl(*)

hinein.

database

Hi,

ZitatBeim ersten mal klicken erneuern sich nur die Datensätze und beim 2. mal raufklicken aktualisiert sich erst das Textfeld mit der Anzahl der Datensätze im UF.

...und wo hast jetzt den Code (Me!Text13 = Me![Unterformular Fragpo].Form.RecordsetClone.RecordCount) hingeschrieben?

Wenn du das im Ereignis 'After_Update' des Kombifeldes verwendest MUSS es die letzte Codezeile sein - ich nehme an, das steht auch Me!DeinUnterform.Requery drinnen.

Tigra1207

Danke das hat geklappt
Zitatich nehme an, das steht auch Me!DeinUnterform.Requery drinnen

das war der wichtige Hinweis.

Vielen Dank

Gruß Marco