title image


Smiley Hängt halt davon ab...
wo bzw. wofür du nummerieren bzw. gruppieren willst. Im Bericht kannst du ja im jeweiligen Format-Ereignis mitzählen und bestimmte Bereiche sichtbar/unsichtbar machen. Im Formular kann man die Formular-Recordsource direkt setzen - z.B., indem man den Vorlage-Recordset abgrast und daraus ein Filterkriterium ableitet:



Dim RS as DAO.Recordset, RSN as DAO.Recordset, DB as DAO.Database

Private Sub Form_Load()

Set DB = Currentdb

Set RS = DB.Openrecordset("DeineAbfrageMitDeinerSortierung",dbopensnapshot)

end sub



Private Sub Naechste_Click()

Dim Tmp as String, I as long

If Not RS.EOF then

For I = 1 to 10

Tmp = Tmp & "," & RS!ID

RS.Movenext

If RS.EOF then exit for

next I

Set RSN = DB.Openrecordset("SELECT * FROM DeineTabelle WHERE ID IN (" & _

Mid(Tmp,2) & ")", dbopensnapshot)

Set Me.Recordset = RSN

end if

end sub





das jetzt nur zur Darstellung des Prinzips und ohne es ausprobiert zu haben.


Gruß aus dem Norden
Reinhard


Bitte immer die Access-Version angeben!
DB-Wiki


Wie man Fragen richtig stellt

YaccessAccess-FAQUnd ansonsten: Wikipedia




geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: