I have a Form Display Data in my Access Database, which is working really well. However, users was asking if there is a way we can make Font Color Could/would change if The text in A field or Any field in my display form contained the word "SAD or MAD". Is there code for such thing in display form?..
View RepliesI 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
----
I'm using Access 2010. I'm passing a string into the OpenArgs of my report - works fine. In the report there are 3 rich text fields which may contain the text I passed in, and if so I want to change the color of that text to red so it stands out.
The value passed to the report changes so I'll need to use VBA in the detail's format section to check each of the 3 rich text fields.
I am attempting to create an expression that will change the font to red if it is an overdue date. It will be on a form with the records showing.
My datebase is for entering, changing, and searching for information dealing with orientation dates, contacts, and associations. My data sheet holds the company name, employee name, date of orientation, due date (orientations are completed annually), contact employee, and status. I would like the date, when opening the form, to show red if it is past due. how to create an expresion to return the status as "Current" or "Overdue", as I am still unsure which method I want to use.
I have an unbound listbox on a form which displays a list of staff, both past and present, based on an SQL query.
I want to be able to differentiate between current and past staff using different colors, i.e. Black text for current employees and red for employees who have left, based on a field (True/False) in the original staff table.
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
Jabez
I have a table named ColorValues with the following three fields:
- ID
- MunsellCode
- RGBValue
30 fields from another table called Color_Analysis are linked to the above with one to many relationships (I've already thought of other ways to normalize data, but this is the most efficient, so no need to go into this topic).
Now, I've constructed a form for Color_Analysis and all 30 fields recording color are included as combo boxes bounded on the ID in ColorValues and displaying the MunsellCode for the user. I've also created unbounded text fields next to the combo boxes and want to use them to display the color that the user selected in the ComboBox. The question is how do I do this?
Essentially I need a piece of code that picks up the value of the combo box (this is essentially the ID in ColorValues), looks up that value in the ID column of the ColorValues table and uses the corresponding RGBValue of the same table as the .BackColor for the unbounded text field.
We need to move rich text from an Access memo field to a Word text box. So far the best Ive been able to come up with is in the code below. In this code pprs!What is a record set field of a table memo field that is bound to a text box enabled for rich text. The rich text seems to be stored as html as so I can get word to convert it by enclosing it in html tags.
Dim What As Word.Shape
Set What = doc.Shapes.AddTextbox(msoTextOrientationHorizontal , doc.PageSetup.LeftMargin, 225, 534, 0)
Dim sPath As String
sPath = "G:Temp.html"
Open sPath For Output As 1
Print #1, "<HTML>" & pprs!What & " </HTML>"
Close #1
What.TextFrame.TextRange.InsertFile (sPath)
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.
Thanks ahead of time for any ideas.
I have an option group of buttons. Is there a way to change the text color of the chosen button?
Thank in advance - John
I need to change the background colour of a text box after a change to the field has been made?
ie.
Make: IBM (Background Color Grey - Default)
User makes a change to Make ..
Make: Toshiba - (Background Color changes to Yellow )
I'm trying to code this with the OnChange option on the TextBox but can't see to find the right code.
I was using Application.SetOption"Background", colour value with no success
I have two forms sourced from one table. if the address of a client has changed then there is a Command button that opens a form to enter the previous address.
What I want is for the text on the command button to change to red if there is a previous address filled in. I have seen it done but cannot copy the code. What I have is on the OnCurrent event of the (main form)
Dim InColor As Integer
InColor=255
Me.[Command126].Forecolor=(And what I want to say here is "If the field previousaddress is not null then ...)*255
Any ideas??? (I wanted to have the database completed before the New Year (less than 12 hours to go!!!)
In Access 2007 (or 2010 , 2013), in a continuous form, I want to change the background colour of a text box depending on its value. Obviously, for each record, the color can be different.
View 1 Replies View Relatedin a continuous form i want to click on one record and have the one field change the background colour to highlight it. When I use the code: Field. BackColor = vbYellow it changes the background on all the records. Is there a code to say only for the record with focus?
View 1 Replies View RelatedI am trying to open a word document with corresponding data filled from the text field of a form. I managed to get the word document but I don't know how to give a variable in word document.
View 2 Replies View RelatedI have 4 fields that are unbound on a form. img1 img2 img3 img4..When these are entered they are all combined and autofill another unbound textbox = imagename.. what i would like to do is from this unbound textbox 'imagename' ..i would like to populate a textbox that IS bound called FileName
[Event Procedure]
Private Sub imagename_Click()
Me.imagename = Me.FileName
End Sub
One of my forms has a text box which is bound to a field called teenumber. This form is set up that "on current" has code
If Me.teenumber = 0 Or IsNull(Me.teenumber) Then
Me.teenumber = Nz(DMax("teenumber", "tblteeofftimesshotgun"), 0) + 1
This enables the text box teenumber to be auto filled with sequential numbers growing by 1 for each record. This database is for a golf tournament and this form enables user to set up tee times for shotgun start for the players.
When the user gets to tee number 18 or whatever the last hole on the course is the teenumber field needs to be reset to 1. With the above code I a unable to do this.
I am needing to design a form that allows a user to add or overwrite a number of records by copying and pasting the information from an Excel Spreadsheet, however one of the problems is that the information being sent has times stored as text - so, for 04:45, it is simply stored as 0445 on the spreadsheet.
Is there a way to have these autocorrect once pasted into the datasheet?Also, is there a way to make a datasheet form that copies a number of records into itself depending on a user selection? The basics of what I am trying to achieve is:
I have a number of services that operate on a number of services (public transport), each vehicle has a unique identifier (Bonnet), and each place in the schedule has a unique identifier (RunNo); there are different schedules for different day types (Saturday, Sunday, Monday, Tuesday to Thursday, Friday and so on), and the times that each RunNo goes out and comes in differs depending on the day type.
At the moment, I have a table which has the following fields:
ID (Autonumber, PK)
DayType
Route
RunNumber
TimeOut
TimeIn
My idea/hope is that a user will be able to open a vehicle allocation datasheet for the day, select the day type (lets say, Saturday) which will then populate the relevant number of rows with the schedule information (looking at a Saturday, that would be 128 rows), and then a blank column to add to the records a vehicle ID that is being used for each RunNo for the day.
Now, on top of all this, I need to also cater for vehicles being substituted during the course of the day - - - if one breaks down, it will have to be de-allocated from the list (so presumably by changing the TimeIn to the current/actual time rather than the scheduled time) and the user will need to be allowed to add a further row to show which vehicle was used next against that RunNo.
Just to further complicate things, there is quite a number of vehicles that will have a time in which is in the following day (ie after midnight) - whilst this isn't a problem in storing the times, I also want this table to be looked up to determine whether a vehicle is currently allocated or not.
The fields for the AllocatedVehicles table are:
ID (Autonumber, PK)
RunNumber
Bonnet Number
DateOfService
TimeOut
TimeIn
It is hope that all of these with the exception of Bonnet Number can be populated by selecting the day type?
I have a continuous form with a text field that says "Select". There are two other fields, one of which is Brand. When the Brand Combo box has nothing in it I want the text box to appear (instructing the user to select a Brand) But once the user selects a Brand and goes to the next records, I would like the "Select" in only that record to become not visible. I tried conditional formatting but can't apply that to an unbound control ( or at least it is grayed out when I select the text box) and any other possible solutions I have found changes all of the selects - not only the one in the changed record.
View 7 Replies View RelatedI have three labels that I can't change the text color. I must have them locked or something. What should I check?
View 5 Replies View RelatedI'm trying to change Selected text color in an Access data Field. I want the change to be permanent and show up in reports.
View 1 Replies View RelatedI would like the label for a text box to read "B&W or Color" for a database of photographs.
Access will not accept the ampersand. Since this is just a label, I thought I could get away with using this symbol.
Is there a way to get the label to accept the ampersand?
I have a continuous form based on a orders table and a details sub form.I list all the records in a continuos form in date of order.i need to change the colour of a single record based on the condition of a tick box on the original orders form
View 1 Replies View RelatedI would like to be able to change font color and appearance while entering data into a form (example: italicize a word). Is there any way to activate the font format while in a form?
View 2 Replies View RelatedMy database has Main form and a Sub form. On main form i place one unbound text box named investigations. In subform of which datasheet there is a column named TestCode. I want unbound text box (Investigations) to display row values which selected in a column (TestCode) of subform.for example:Investigation field should display "CBC,HB,ALP".
View 5 Replies View RelatedI have 5 textboxes and a multiline textbox in a form in my Access Database. I am going to type several keywords in those textboxes and I am going to type an article in the multiline textbox.
What I need to do is I want to calculate the keyword density in the article. I can do that if i know how to search the whole text in the article and count the specific word. And I want a function to count all the words in the article too.