[kapetang]

Καλημέρα

Μάρω, δε γνωρίζω τι ακριβώς προσπαθείς να κάνεις, αλλά υποψιάζομαι ότι ακολουθείς λάθος δρόμο.

Θα πρότεινα να ανεβάσεις ένα δείγμα της βάσης σου.

Ο κώδικάς σου θα μπορούσε να προσαρμοστεί ως εξής:

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    Dim RST As Recordset, QrS As QueryDef

    Set QrS = CurrentDb.QueryDefs("Ερώτημα")
    QrS.Parameters("ΌνομαΠαραμέτρου") = ΤιμήΠαραμέτρου
    Set RST = QrS.OpenRecordset

    Me!Κείμενο297 = RST.Fields("Εκπρόσωπος")
End Sub

Γιώργος