How do you change negative number to red in a report's text box? i am thinking it is an iff statement in the control source field but running into issues.
Is there a way to change all Negative nubmers to red in a Report? That is, do i have to change all text boxes individually?
I have a report which I would like to change the text of a field blue if a certain condition is met. What I want to happen on this report is if a specific field has an "Active" - then it will be in Blue text, otherwise it is in black text.
I have gone into the report ->in the Details section -> put a procedure in the On Format event. The code I have been trying is:
----- If Analysis_Status = Active Then Me.Analysis_Status.ForeColor = vbBlue Else Me.Analysis_Status.ForeColor = vbBlack End If End Sub ----
In access report, I'm trying to change color of text in specific records based on the true/false value in another record. Works in forms using conditional formatting, but won't seem to work in a report.
Here's what works in forms : IIf([2009 Symposium]=true, forecolor=255 ....this changes the records to red.
But using the same expression in a report doesn't change the text color.
I am trying to change the button color on a subform if a related form data changes.Main form is products with a continuous subform with serial numbers of products i.e, serial number, location, price and a button to add addtional issues if there are any for this particular serial number (this will open up another form related to the serial number so I can add an issues if there are any).The reason I would like the button to be a different color is so I can quickly see if there are any additional notes been added to the serial number. Just in case you may ask why not add the field to the continuos form is that the issues and be quite lengthy and there may be lots of serial numbers on the form
I have a report which is counting and totalling numbers, but in the numbers show as negatives - I need them to show as positives.I managed to change the total in one counting field to positive but I've forgotten how - or where I put the code....
I'm trying to add some life to my form by using some different colors, but I can't figure out how to change the color of a button. Does anyone know how to do this? Thanks
On a form how can i get the text to change to red if the number is Greater than 500 and blue if the number is less than 500, the text box is populated via a query
I have a Data Access Page that I need some help with some of the code.
I need to do a comparison to see if the TimeStamp Control is less than one hour old. If it is, it should have the background turn red. If not it should stay white.
Form = BLine_Messaging Control = TimeStamp
Code:<SCRIPT language=vbscript event=onload or=window><!--If (BLine_Messaging.TimeStamp.value > DateAdd("H", -1, Date)) THEN BLine_Messaging.style.backgroundColor="white"else BLine_Messaging.style.backgroundColor="red"end if --></SCRIPT>
I have a similar problem, I'm fairly new to ACCESS and am learning it is vastly different than EXCEL that we use (we are upgrading to ACCESS to track our "in" and "out". I have set up a ACCESS database to track our barge loading and pumping, on the delay we enter reason for the delay but if no delay occurs it is left blank. How can I get the field to change colors if information is entered and left alone if none is entered. Quote: Originally Posted by shamrog12 Make sure to dim recItem1Value and backg in the appropriate area
Try this: Code:<%recItem1Value = lcase(Recordset1.Fields.Item("RecItem1").Value)backg = ""Select Case recItem1Value Case "x" backg = " style=""background-color:red;"" " Case Else backg = ""End Select%><!-- whatever code here... //--><td<%=backg%> nowrap><input name="txtField1" type="text" onChange="RecUpdate value="<%=(Recordset1.Fields.Item("RecItem1").Value)%>" size="4"></td>
I have installed Windows 10 & Office 13.The Background color of MS Access 13 is white in color which is irritating. Is there a way to change the background color?
Please can someone tell me how to change the back colour of a control when it has the focus and then revert to the original colour when it loses it. I have 35 controls on my form, so I need a function, rather than changing the colour with a subroutine evey time.
I have searched the site and haven't found whatI want-though I'm sure this question has been asked before.
I have a report card program that I use in my classroom. The program calculates letter grades for various sub categories.
For example, under the Primary Category Math, the computer will calculate a letter grade based on assignment scores and place the grade into a combo box for the sub category "Able to use a graphing calculator."
If I override the grade the program calculated for a student, I would like the text in the combo box to change to red for that student only. Then I can go back and quickly see which grades I have manually changed.
I just cannot seem to figure out the logic to use VBA that would check to see if a user has changed individual combo boxes.
What I want is in the combo box, I have a couple of options, say 1,2 and 3. And I want the combo box to come up with different color when different option is selected.
I thought I have found out a way, with the following code to onClick:
If me.field.text = "1" Then me.field.backcolor = 255
The problem is, it's being shown on a continuous form. And it changes the color on all the records. not just the one I am on.
I have created a MS Access barchart by running a query. X axix has user name and y axis has counts. I would like to change every bar's color based on the x axis user name value .Is there a way to do that using vba code in MS Access barcharts.
All I want to do is change the font color and weight of a couple of columns in a form. No conditions or change when button is pressed or anything like that. Just be blue and stay blue.
I've tried making it a memo, rich-text field and it didn't work.
It works fine in the "member details" form, but not the "member list" form.
What I'm trying to do is make it so that a certain area of my Detail area in my report changes colors based on whether or not a field name for each record is set to "Yes". The effect I wanted was produced easily enough by creating a Rectangle, coloring it Red, and setting it to not visible.
Putting RedBox.Visible = True in the Report On Load procedure works just fine. The problem I am having is attaching a condition to it.
Code:
If Me.FormatBox.Value = "Yes" Then RedBox.Visible = True End If
This compiles ok, but doesnt do anything to the actual report. Will it not work because the report has x amount of FormatBox's because it gets replicated for each record that is displayed? I should also note that I tried using a DL Lookup within my If statement and that didnt work either. That just colors all the boxes red and ignores the check.
Code: Dim TestVar As String TestVar = DLookup("Priority", "Table_Lancaster_Dispatch", "Priority = 'Yes'") If TestVar = "Yes" Then RedBox.Visible = True End If
I have access query opening in excel. After it opens i would like everywher where where is says "no", to make next 2 cells BLUE.
The code below is doing it, but it's taking few minutes. is there any way to speed it up ?
'shading non-matching items With objActiveWkb.Worksheets("Reconciliation Sheet").Range("b5:ak500") Set c = .Find("No", , , xlWhole, , , True) If Not c Is Nothing Then sAddress = c.Address Do c.Offset(, -2).Resize(, 3).Interior.Pattern = xlSolid c.Offset(, -2).Resize(, 3).Interior.ColorIndex = 33 Set c = .FindNext(c) Loop While Not c Is Nothing And c.Address <> sAddress End If End With
I searched around but i couldnt really find or atleast understand how to do what i want to do. I want upon the user clicking on a checkbox for the background of the form to change to a set color?