If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Access 2003 Report generation
I have a report that contains the .Line method to draw a series of boxes
around controls that can vary in size depending on their data content. I would like to have each box shape filled with a colour suitable to its control data, rather than have a back-fill for the control data. Can you please give me an idea as to how to code it. I have tried the .FillColor property but without success. Thanks. |
#2
|
|||
|
|||
Access 2003 Report generation
It would have helped if you had provided your existing code. However, I have
been able to shade a background with code like: Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) Dim intMaxHeight As Integer Dim ctl As Control Dim lngHilite As Long lngHilite = 10092543 'pale yellow 'Find highest control in Detail section _ that has a tag property of "Border" For Each ctl In Me.Section(0).Controls If ctl.Tag = "Border" Then If ctl.Height intMaxHeight Then intMaxHeight = ctl.Height End If End If Next 'Draw a box around each control in Detail _ that has a tag property of "Border" For Each ctl In Me.Section(0).Controls If ctl.Tag = "Border" Then 'replace conditional formatting making the _ background of City=London pale yellow If ctl.Name = "City" And ctl.Value = "London" Then Me.Line (ctl.Left, ctl.Top)- _ Step(ctl.Width, intMaxHeight), lngHilite, BF End If Me.Line (ctl.Left, ctl.Top)- _ Step(ctl.Width, intMaxHeight), vbBlack, B End If Next End Sub -- Duane Hookom Microsoft Access MVP "hlamo" wrote: I have a report that contains the .Line method to draw a series of boxes around controls that can vary in size depending on their data content. I would like to have each box shape filled with a colour suitable to its control data, rather than have a back-fill for the control data. Can you please give me an idea as to how to code it. I have tried the .FillColor property but without success. Thanks. |
Thread Tools | |
Display Modes | |
|
|