[ Φόρμες ] αλλαγη χρώματος επιλεγμένου record

[exarhos]

γεια σας και πάλι
έχω κολλήσει σε κάτι και θα ήθελα τη βοήθεια σας
σε μια subform χρησιμοποιώ ενα combobox ώστε να επιλέγω εγγραφές βάση της τιμής του με τον παρακάτω κώδικα
DoCmd.SearchForRecord acForm, "main_job", acFirst, "[ÏÍÏÌÁ ÐËÏÉÏÕ] = " & "'" & Screen.ActiveControl & "'"
θα ήθελα η επιλεγμένη εγγραφή να αλλάζει χρώμα αντί να αναβοσβήνει ο κέρσορας όπως γίνεται τώρα.
σας ευχαριστώ εκ των προτέρων.

[Tasos]

Καλησπέρα!

Έχαρχε, έστω ότι το αναγνωριστικό πεδίο του πίνακα/ερωτήματος στην προέλευση εγγραφών της φόρμας έχει το όνομα "ID"

Φρόντισε να προσθέσεις το πεδίο "ID" στην φόρμα αν δεν υπάρχει.
κατόπιν πρόσθεσε ένα πεδίο κειμένου που θα παραμείνει αδέσμευτο και δώσε του το όνομα [XF] (παραδειγματικό όνομα).

Επίλεξε όλα τα πεδία της εγγραφής που επιτρέπουν μορφοποίηση υπό όρους και πάτησε την εντολή Μορφοποίηση υπό όρους,
δημιούργησε έναν νέο κανόνα και στο πεδίο της παράστασης πέρασε: [ID]=[XF] (βλ. εικόνα), επίλεξε μορφοποίηση και κλείσε τα παράθυρα με ΟΚ.



Κατόπιν, στο συμβάν της φόρμας "Με το τρέχον" ("Current" στον VBE) πέρασε τον παρακάτω κώδικα:

Private Sub Form_Current()
    On Error Resume Next
    Me.XF = Me.ID
End Sub

Με αυτό τον τρόπο θα χρωματίζεται αυτόματα η επιλεγμένη εγγραφή.

Με εκτίμηση

Τάσος

[exarhos]

Τάσο σ'ευχαριστώ πάρα πολύ.
με εκτίμηση
Έξαρχος