[AccessD] WAY OT:Excel Formatting Q

Under format select conditional formatting. The wizard will show you how to
do what you want to whatever cells you have highlighted.
Jim Hale

-----Original Message-----
From: Darren DICK [mailto:tripledee at bigpond.com]
Sent: Monday, November 28, 2005 3:50 PM
To: accessd at databaseadvisors.com
Subject: [AccessD] WAY OT:Excel Formatting Q


Hi all
I apologise for the OT
So feel free to respond to my personal email if you wish

I am setting up an excel document that has a column that records
pass/fail/not tested - Only 1 of 3 possibilities
What I want is the default to be "Not tested" and the backcolour of that
cell to be say...orange
The...
If a user types F or Fail or fail I want the backcolour to go red 
If a user types P or Pass or pass I want the backcolour to go green


In access I would write a function something like this

F_SetBackColour(strControlName as string, strControlValue as string)

	select case strControlValue
	
	Case "F" or "fail" or "fail"
		Forms!someForm(strControlName).backcolor = 255
	Case "P" or "Pass" or "pass"
		Forms!someForm(strControlName).backcolor = vbGreen
	Case Else
		Forms!someForm(strControlName).backcolor = vbOrange
	end select
End function

And in the after update of each relevant control I would have something like

Private sub SomeControl_AfterUpdate()

F_SetBackColour(me.currentControl, me.currentControl.value)

End sub

To achieve this in Excel what would I have to do?

Many thanks in advance

Darren

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

***********************************************************************
The information transmitted is intended solely for the individual or
entity to which it is addressed and may contain confidential and/or
privileged material. Any review, retransmission, dissemination or
other use of or taking action in reliance upon this information by
persons or entities other than the intended recipient is prohibited.
If you have received this email in error please contact the sender and
delete the material from any computer. As a recipient of this email,
you are responsible for screening its contents and the contents of any
attachments for the presence of viruses. No liability is accepted for
any damages caused by any virus transmitted by this email.