PDA

Vollständige Version anzeigen : Datensatz Nummerieren


ulrich b
30.01.2001, 16:37
Hi
Ich mochte in einem Endlosformular die einzelnen Datensätze Nummeriert haben (1 Datensatz Nr 1, 2 DS Nr2...). Wie mach ich das? Autowert ist nicht möglich, da die Datensätze auf einer Abfrage basieren und die Nummern so in der Ursprungstabelle häufiger vorkommen.

Danke Uli

Squirli
30.01.2001, 18:31
Hallo Uli versuchs mal mit folgendem Modul:

Public Function Zähler()
On Error GoTo errZähler

Dim lform As Recordset
Dim lNr As Integer
Set lform = Forms!DeinFormularname.RecordsetClone
lform.Bookmark = Forms!DeinFormularname.Bookmark
lNr = lform.AbsolutePosition + 1
Zähler = lNr
Exit Function

errZähler:
Zähler = 0
End Function

In einem Textfeld im Detailbereich des Formulares =Zähler() im Steuerelementinhalt eingeben.

Grüße
Squirli