Hallo!
Ich habe einen Tabelle mit einigen Datensätzen.
Jeder Datensatz hat eine 8stellige Rechnungsnummer die immer mit dem laufenden Jahr beginnt (Bsp. 12050811).
Wie würde eine VBA aussehen, in der alle Datensätze des aktuellen Jahres gezählt werden und die Zahl in einem Formular angezeigt wird.
Hallo,
was ist denn das Jahr, die 12 =2012 ?
VBA brauchst Du dazu nicht. Entweder als Abfrage (SQL) oder als Steuerelementinhalt.
das Jahr ist 12......
Hallo,
dann erstelle ein ungebundenes Textfeld am Formular und trage in den Eigenschaften des Textfeldes bei 'Steuerelementinhalt ein:
=DomAnzahl("*";"DeineTabelle";Links([RechnungsnummerFeld];2)=12)
HTH
Danke für den Tipp.
nun müsste ich allerdings jedes Jahr die VBA ändern. Es muss doch auch die Möglichkeiten geben automatisch vom aktuellen Jahr die Anzahl anzeigen zu lassen.
Hallo,
du kannst auch ins Ereignis 'Beim Anzeigen' deines Formulars folgendes eintragen:
Private Sub Form_Current()
Me.DeinTextfeld = DCount("*", "DeineTabelle", "left([RechnungsnummernFeld],2)=" & Right(Date, 2))
End Sub
oder alternativ im Steuerelementinhalt
=DomAnzahl("*";"DeineTabelle";"[RechnungsnummernFeld] like '" & Rechts(Jahr(Datum());2) & "*'")
Danke, das war genau das, was mir gefehlt hat ;D