U ovom primeru koji si našao:
Citat:
Dim strDocName As String
Dim strWhere As String
strDocName = "rptSomeReport"
strWhere = "[RunID]=" & me!RunID
DoCmd.OpenReport strDocName, acPreview, , strWhere
strDocName= naziv tvog izveštaja.
strWhere= "[RunID]=" & me!RunID, znači da na formi i na izveštaju imaš polje koje se zove RunID. Ti, umesto RunID, stavi nazive polja iz tvoje baze. Ovako postavljen uslov neće ti štampati isključivo zadnji zapis, već zapis na koji se trenutno pozicioniraš, što je verovatno bolje jer ti daje veće mogućnosti izbora. Ako baš želiš da uvek štampa samo zadnji zapis, onda u Query-ju koji je Data Source za izveštaj postavi kriterijum na neko od polja da ti prikazuje samo taj zapis