Different Color Per Record on Continuous Subform

I have a continuous subform that displays records with color (RGB) data.  I would like each record to display a color "chip" field whose color is based on the RGB values that are also present in each record.  I have code that sets this color for each record (using the On Current method), but all records on the subform change to the current record's color value when changing records.

Is there any way to set the color by record, and have it display correctly so that the user does not have to select each individual record to see the color display?

Thanks!

I am using Access 2007, Win XP Pro (SP2).
Donovan MooreAsked:
Who is Participating?
 
Donovan MooreConnect With a Mentor Author Commented:
I'm going to go ahead and close this one out...
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
You can use Conditional Formatting.

here is the basic info

First ... a short tutortial
http://www.simply-access.com/ConditionalFormattingIntroduction.html

In VBA code:

http://msdn2.microsoft.com/en-us/library/aa139965(office.10).aspx

And then from the Access Help File:
--------------------------
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
"but all records on the subform change to the current record's color value when changing records."

Which is because physically there are only one set of controls on a continuous form.

mx
0
The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

 
Donovan MooreAuthor Commented:
I don't believe Conditional Formatting will work in this case.  I need each color chip to use the specific RGB values per record.

I have created an image that might better explain what I'm looking for (you'll need to copy and paste):

http://s6.photobucket.com/albums/y207/SSURORG/ColorValues/Misc/?action=view¤t=ColorChipExample.jpg

Thanks again.
0
 
Donovan MooreAuthor Commented:
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Sorry ... I missed that ... the RGB part. I see what you mean now.

The only way I could see that being done would be controlling CF via VBA code ... which gives you a lot more flexibility that using the CF wizard.

How many different RGB combinations are we talking about here?

mx

0
 
Donovan MooreAuthor Commented:
"How many different RGB combinations are we talking about here?"

Hoo boy.  Potentially 255 cubed.  The entire sRGB255 color spectrum I suppose.  Which will only get more complicated once Deep Color is instituted...4096 cubed.

I might start looking at controlling CF via VBA...if that seems plausible.
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
"I might start looking at controlling CF via VBA...if that seems plausible."

Humm .... with THAT many combinations, that could be ... interesting!  Because basically, it's going to be ... If Some Condition, Display Some RGB Color.  Yikes!

You *might* get some info form this:
http://www.lebans.com/conditionalformatting.htm

however, it's a different situation ... but ... you might find something useful in Steven's code.

mx
0
 
incrediblejohnCommented:
Is this a start:

Me.txtID.FormatConditions(0).BackColor = RGB(255,240,240)
Me.txtID.FormatConditions(1).BackColor = RGB(240,255,240)
Me.txtID.FormatConditions(2).BackColor = RGB(240,240,255)
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Ethx - what is the condition(s) the determine what the RGB color should be ?

mx
0
 
DatabaseMX (Joe Anderson - Microsoft MVP, Access and Data Platform)Commented:
Interesting - form Help:

FormatConditions Property
See AlsoApplies ToExampleSpecificsYou can use the FormatConditions property to return a read-only reference to the FormatConditions collection and its related properties.

expression.FormatConditions
expression    Required. An expression that returns one of the objects in the Applies To list.

Remarks
This property is available only by using Visual Basic.

Conditional formatting can also be set on a combo box or text box from the Conditional Formatting dialog box. The Conditional Formatting dialog box is available by clicking Conditional Formatting on the Format menu when a form is in Design view.

Example
The following example sets format properties for an existing conditional format for the "Textbox1" control.

With forms("forms1").Controls("Textbox1").FormatConditions(1)
    .BackColor = RGB(255,255,255)
    .FontBold = True
    .ForeColor = RGB(255,0,0)
End With

0
 
Donovan MooreAuthor Commented:
Thanks for the help DatabaseMX and incrediblejohn...

As far as the RGB conditions go...well, the RGB values are stored for each Color Value.  I have a database with over 30,000 colors - Pantone Matching System (PMS) colors, Pantone Textiles, Pantone Goe System colors, Pantone Process Colors, Robison-Anton threads, Madeira threads, Toyo Inks, etc., etc., etc.  Each color value can have a set (or multiple sets) of RGB, HTML, CIE-L*ab, CMYK, Formula Mixes, etc. information attached to it.  I store multiple color spaces as well, and each color space will have different RGB colors.  And, I store historical values as well.

Probably more info than you need (!)...
0
 
incrediblejohnCommented:
The problem isn't finally getting the color you want using VBA/VB in code. The problem is that the continuos forms setting only references the current record when you reference the textbox. In other words, all the other rows would go back to nothing if the record selector is not on them. You might have to build a custom grid. What you want can be done pretty easy in dynamic html. I guess you could embed a browser control in your form, hahaha
0
 
incrediblejohnCommented:
Also, there is a hack using a hidden txtBox on the header section above the detail where you could change the color of just the selected row. I've done that many times, but the other rows won't remember your colors.

You could also build a whole ton of labels in rows to fake a grid and set their bg color at runtime. Then hack a solution to edit the record (new form).
0
 
Jeffrey CoachmanMIS LiasonCommented:
Ethx,

I am working on a sample...

I'll keep you posted.
;)
0
 
Donovan MooreAuthor Commented:
Thanks boaq2000...I appreciate it!
0
 
Donovan MooreAuthor Commented:
Not trying to pressure, but any progress?

Thanks.
0
 
Jeffrey CoachmanMIS LiasonCommented:
Oh!
:O

OK, I try to work on it a little at a time, in my spare time.
We'll say ...by Monday it should be ready.

I have some spare time this weekend

JeffCoachman
0
 
Donovan MooreAuthor Commented:
No problem...again, I appreciate your help!
0
 
Donovan MooreAuthor Commented:
Just bumpin' this one up again...
0
 
Jeffrey CoachmanMIS LiasonCommented:
Opps benn busy at work
Umm, let's say Monday?
0
 
Donovan MooreAuthor Commented:
No problem!
0
 
Donovan MooreAuthor Commented:
Just checking in again...
0
All Courses

From novice to tech pro — start learning today.