Μπορείς να αλλάξεις την ιδιότητα RecordSource στο συμβάν OnOpen της αναφοράς περνώντας την sql είτε μέσω μιας δημόσιας μεταβλητής είτε κρατώντας την τιμή της σε ένα αόρατο textbox της φόρμας από την οποία καλείς την αναφορά (σε αυτή την περίπτωση η φόρμα πρέπει να είναι ανοιχτή όταν ανοίγει η αναφορά).
Αλλιώς θα πρέπει πρώτα να ανοίξεις την αναφορά σε προβολή σχεδίασης, να αλλάξεις την προέλευση εγγραφών, να την κλείσεις και κατόπιν να την ανοίξεις ξανά στην προβολή που επιθυμείς.
Αλλος τρόπος είναι να ορίσεις ως προέλευση εγγραφών της αναφοράς ένα ερώτημα και να αλλάζεις την sql του ερωτήματος πριν ανοίξεις την αναφορά.
Dim dbs as Database
Dim myQuery as QueryDef
Set dbs= CurrentDB
Set myQuery= dbs.QueryDefs("ΌνομαΕρωτήματος")
myQuery.SQL = "........."
myQuery.Close
Set myQuery = Nothing
Set dbs = Nothing