Thema Datum  Von Nutzer Rating
Antwort
11.06.2021 09:25:01 Irina
Solved
11.06.2021 09:55:04 Mase
Solved
27.06.2021 04:04:35 Wowa
Solved
27.06.2021 12:52:55 Mase
Solved
Rot RecordCount
27.06.2021 16:41:31 Wowa
Solved
27.06.2021 16:45:07 wowa
Solved
27.06.2021 16:49:35 Gast1068
Solved
27.06.2021 21:08:19 Mase
Solved

Ansicht des Beitrags:
Von:
Wowa
Datum:
27.06.2021 16:41:31
Views:
471
Rating: Antwort:
 Nein
Thema:
RecordCount

Danke schonmal für die Hilfe, aber kannst du das bitte erklären was du meinst? 

Diese Abfrage: In einem Modul Abfragen oder über "Abfrageentwurf"? 

Private Sub btnZählen_Click()
Dim db As Database
        Set db = CurrentDb
    Dim Zähler As Integer
    Dim rs As Recordset
        Set rs = db.OpenRecordset("Select Count([tblTier].Standort_Id) as [txtAnzahl] From [tblTier]")
        Me.txtAnzahl = Zähler
        While Not rs.EOF
            Zähler = Standort_ID
            rs.MoveNext
        Wend
        MsgBox "Dieses Tierheim enthält " & Zähler & " Datensätze."
        rs.Close
End sub

Am Ende soll auch die Anzahl der Tiere im txtAnzahl feld angezeigt werden. Kann ich das mit me.txtanzahl anstatt MsgBox machen? 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
11.06.2021 09:25:01 Irina
Solved
11.06.2021 09:55:04 Mase
Solved
27.06.2021 04:04:35 Wowa
Solved
27.06.2021 12:52:55 Mase
Solved
Rot RecordCount
27.06.2021 16:41:31 Wowa
Solved
27.06.2021 16:45:07 wowa
Solved
27.06.2021 16:49:35 Gast1068
Solved
27.06.2021 21:08:19 Mase
Solved