Kamis, 01 Oktober 2015

RE: [MS_AccessPros] conditional formating

 

Dear JoyInTheJourney,

 

WOW.

 

So are the labs all listed in the same box?   A subreport?  I'm hoping you get this very interesting problem solved.

 

 

I'm wondering if you're going to have to do something like use a recordset on the format detail event of a subreport such that:

 

 

Dim strLabHold as string

Dim db as dao.database

Dim rs as dao.recordset

Dim strsql as string

Strsql = "SELECT LABS from Labwork WHERE PatientID = " & me.PatientID & "SORT BY LABS;"

Set rs= db.openrecordset(strsql)

While not rs.eof

  If rs("LABS") <= strLabHold +4 then

      me.TheUnderline.visible = true

else

      me.TheUnderline.visible = false

   End if

   strLabHold = rs("LABS")

   Rs.movenext

wend

Set rs = nothing

Set db = nothing

 

But I'm looking at this and seeing that this will not work.  Perhaps someone else has an idea or perhaps this sparked an idea that would actually work.

 

Interesting!  Btw, love the email name.

 

Liz

 

From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Thursday, October 01, 2015 12:31 PM
To: MS_Access_Professionals@yahoogroups.com
Subject: [MS_AccessPros] conditional formating

 




I created a report that gives me a list of labs that a person has had for the past six months.  For instance their labs run 6,7,43,68,8, 92,92,2 and 93.  What I am wondering is if there is a way using conditional formatting to be able to highlight any lab values that fall within a range of 4.  Therefore in the example above, 6,7,8,92,92, and 93 would all have to be highlighted.  Im pretty new at this, so any help you can give me would be appreciated.  Thanks.






This email (and all attachments) is for the sole use of the intended recipient(s) and may contain privileged and/or proprietary information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message.

__._,_.___

Posted by: Liz Ravenwood <Liz_Ravenwood@beaerospace.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (2)

.

__,_._,___

Tidak ada komentar:

Posting Komentar