Forms :: Hex Number Conversion - Assign Back Color To A Control
Aug 9, 2014
I'm using Access 2010
What I want to be able to do is to assign a back colour to a control from VBA. There are many colours and what I thought would be an easy process was to choose a suitable colour to be assigned using the colour picker for a control, note the hex number then in my vba code would be
if... then me.mycontrol.backcolor=&HF0AD34
This compiles OK, but produces a completely different colour - I'm expecting an orange colour but getting blue and in another example a pale blue is coming out a brown.
Research indicates adding an ampersand to the end changes the value from integer to long but if I type
if... then me.mycontrol.backcolor=&HF0AD34&
The second ampersand disappears. In the immediate window
?&HF0AD34
?&HF0AD34&
?Val("&HF0AD34")
?clng("&HF0AD34")
?Val("&HF0AD34&")
?clng("&HF0AD34&")
All produce the same value of 15772980, which if I copy back to the control backcolour property produces the blue colour and not the required orange - which if i debug.print me.mycontrol.backcolor give me 3452400 - the correct number for orange.
The problem seems to be converting the hex number to a long.
Also how to modify the properties window to show the decimal value rather than the hex value, but can't see anywhere to do this.
View Replies
ADVERTISEMENT
Mar 15, 2014
How do I conditionally change the Back Color and Alternate Back Color based on the value of notes.FollowUpDate? I have a continuous form using the following code:
Code:
Private Sub b_all_past_Click()
Me.resultsFrame.SourceObject = "FollowUp_bystaff"
Me.resultsFrame.Form.RecordSource = "SELECT * From notes WHERE (((Notes.FollowUpDate) < Date()+1) And ((Notes.followup_person_id) = GetCurrentUserId()))ORDER BY notes.priority,(notes.FollowUpDate) DESC;" '
End Sub
View 1 Replies
View Related
May 12, 2015
The code I am modifying looping through Me.controls collection to identify appropriate control types. Is there a way to influence the order (sequence) of that traversing? Or in different words, is there a way to assign by design certain item number to a given control?
View 4 Replies
View Related
Apr 5, 2005
Quick question here I hope.
I've got a little box covering up a drop down arrow on a combo control that resides on a tab control. The problem is that, since the Back Color property isn't available for a tab control, I have no idea what color it is...which is what the color of my box object (rectangle technically) needs to be so as to blend in. It looks a little garrish with it standing out there...
Any ideas what the default color of the tab page background is? Using Access 2003.
Thanks
-NR
View 4 Replies
View Related
May 5, 2005
Hi all,
Using Access 2003, WinXP SP2.
I have a form with the standard light grey background. I insert a tab control, and the default back color is white. I set the BackStyle to Transparent, and it still displays as white.
Am I missing something here, I want the back color of the tab control to be the same as my form.
Now, what's really odd, is in this project it creates tab controls as white, but if I open an old project of mine, it creates tab controls with the same light grey back ground of the form.
Any help?
TIA
Hammy
View 14 Replies
View Related
May 10, 2013
Is it possible that once the command button "Send Cost Request" in red is pressed it will change to green?
View 3 Replies
View Related
Apr 30, 2014
I have images in my form, say, Image1 and Image2 . The default background color for all of them are white. If the user click image1, the background color has to be red. If the user click image2, the background has to change to red and the image1 retains its default color ( White ).
I have six images to loop through these. Image1 to image6.
View 8 Replies
View Related
Aug 1, 2013
I have a form in datasheet with the fields "Date In" and "Date out" among other.
I want to be able to Change the backcolour of the "Date In" to red, yellow, or green depending on the length of time elapsed between current date and date in. This works fine on the conditional formatting, but now I only want to apply this formatting IF the "Date Out" is empty.
Access 2007.
View 3 Replies
View Related
May 30, 2013
I am working with textbox [DispCD] (a date field) on form [Contract]. There is a dropdown on combobox [Searchbox] for selecting the desired record. I am writing VBA in the [Searchbox] OnChange event. The control source for [DispCD] would normally be "=Searchbox.column(11)". If "column(11)" has a date, I want [DispCD] to show that date and then be locked. If "column(11)" does NOT have a date, I want [DispCD] to allow entry of a date with the date picker showing. I've tried to assign the control source to [DispCD] with this:
CSVal = Format(Forms![Contract]!SearchBox.Column(11), "ddd m/d/yyyy") (this works)
If CSVal = "" Then _
Forms![Contract]!DispCD.countrolsource = "=SearchBox.Column(11)"
I get "Object doesn't support this property or method" error.
View 4 Replies
View Related
Dec 7, 2014
I have a linked table in ms access and it has a column as details. in ms access when i click on this button i will go to another form. i want to assign a picture (for opening a form) to this column but i don't know how i have to do this. my form opens as a datasheet view.
View 3 Replies
View Related
Apr 24, 2014
Auto number will not work for what I want to do. I am creating a simple database that will assign the user with the next incremental number in a field. The intent of the database is for the user to enter three text fields and then obtain the number. I believe that Dmax would work but do not know how to make populate the table.
View 10 Replies
View Related
Jul 23, 2014
So I have a control called txtBranch. If the user does not put 1 of 4 options then a msgbox pops up and says that is an invalid option and then gives all the valid options. It then sets the value to blank. Then it moves to the next field. I do not want it to move to the next field. I want it to stay on txtBRanch till it has a correct value. I have tried DoCmd.GoToControl "txtBranch", Me.txtBranch.SetFocus on the OnExit, OnLostFocus, AfterUpdate events and it still continues to go to the next control how do I get it not to go to the next control?
View 9 Replies
View Related
Apr 18, 2014
how to have a different conditional colour formatting for a plus and a minus number
If the field value is a Plus Number
The background colour will be Green
If the field value is a Negative Number
The background colour will be Pink
View 6 Replies
View Related
Oct 21, 2013
I have an unbound form with a combobox which needs to be validated before the control is updated.In the Before Update event I check that the value is valid and need to reset the value back to the previous value if not valid and then change focus to another control.I thought that the following code would work but the selected value remains in the control and I cannot move the focus to another control.
Code:
Private Sub cboYears_BeforeUpdate(Cancel As Integer)
Dim dteNewDate As Date
dteNewDate = DateSerial(Val(Me.cboYears), Month(Me.txtCalendarHeading), 1)
[code]....
View 7 Replies
View Related
Jul 21, 2006
I have a CONTINUOUS form that shows all my records. I want it to change the back color of a field when it is a certain value. so far i get it to change back color when the very first record in the list is a certain value, but then it will change the back color for every value and not just one value.
can i fix this?
View 7 Replies
View Related
Jun 30, 2014
on one of my forms I want the option to change the backcolor of a label and no matter what I try it wont work right.
Code:
Me.ColorlvlOne.BackColor = vbBlack
View 8 Replies
View Related
Jan 11, 2005
Is there a way to change the back color of an active field in a form? Meaning, when I tab through my form and the field I tab to becomes active, the field turns white. This poses a problem because my form back color is black and my field text is white. When the field is active, I can't see the value in the field due to the back color defaulting to white. Does this make sense? Is there a way to change it?
View 7 Replies
View Related
Sep 25, 2013
This is re-statement for clarity of earlier thread deleted.
In Access 2010 I have a Report with a Detail Section that shows a record and a Sub-report that shows the many records of a one-to-many relationship.
The Report Detail Section Property Sheet specifies a Back Color and a different Alternate Back Color.
Report View alternates the Detail Section background colors correctly.
Print View and Printing DO NOT correctly alternate the background colors. Back color and Alternate Back Color appear in irregular sequences.
how to fix it?
View 2 Replies
View Related
Jun 19, 2014
Code:
'Pacer frame set to proper background
If Me.FrmPacer.Value = 1 Then
Me.LblPacer.BackColor = vbGreen
ElseIf Me.FrmPacer.Value = 2 Then
Me.LblPacer.BackColor = vbYellow
ElseIf Me.FrmPacer.Value = 3 Then
Me.LblPacer.BackColor = vbRed
[code]...
I have multiple frames on one subform that when selected sets a unassociated labels back color. Then when cancelled by undo code the back color stays on the color that it was changed to on afterupdate event from the frame with option controls. I would like to loop thru but could not come up with the proper method if it is even possible.the above code works after refreshed, but just wondering if there is a shorter or more efficient method.
View 3 Replies
View Related
Aug 18, 2006
I have been pulling my hair out (OK, I would be if I had enough to do so) over trying to assign a value to a control on a form. Basically, when a change is made to the form, I'm using the AfterUpdate event to trigger the code. The code in the event is
Me.txtWho = Environ("UserName")
Simple, straightforward or so I thought. Problem is, it gives me an error stating I cant' assign a value to that object. txtWho is bound to a field in the query underlying the form and the control is enabled and not locked. Can anyone shed some light on this for me please????
View 13 Replies
View Related
Jun 10, 2007
I am in the process of building a table on Access 97 where one column will have a list of various buildings. The problem is I will need to import a spreadsheet from Excel 97 into the Table, and although the spreadsheet will match the Access table in terms of column headings, it's data is numerical ie a number has been assigned for each buliding instead of the building name. I need the Access table to show the building name instead of the number.
Is there a validation rule I could use when creating the Access table where a number will = a specific building name. ie 1= Lunar House 2= Apollo House 3 = Mackenzie House etc. So when it does come to importing my spreadsheet the numbers will show as buildings.
Hope you can help....many thanks
Russell from UK
View 2 Replies
View Related
Jun 10, 2014
I have a text box control in a form that is bound to a table field. The field is of numeric format that stores time duration in minutes. I would like to apply sort of transparent / automated conversion. It would work so follows:
- when someone read records, the text box would convert a integer number stored in the filed into text so that the text box would show the time duration in this form "HH:MM"
- when someone clicks on the text box to change the value, one would input the value in this form again "HH:MM" but the text would be converted to minutes and then stored in the database.
View 2 Replies
View Related
Jul 16, 2006
I am using MS Access 2000 and have imported some raw data one of the rows of data shows a time but displays this as a general number ie; 1246 or 745 is there any way I can convert this number into a time, 24hr would be nice, so 1246 displays as 12:46 and 745 displays as 07:45 or 1530 displays as 15:30 ?
Best Wishes
Richard
View 1 Replies
View Related
Jul 22, 2006
My challenge is to fix a broken report that results from a query. The query is suppose to bring up all records within a date range. The problem is that the table was designed with the date field being text. Dates such as 06/12/2006 are entered without the beginning 0, so simple queries do not work, and the data is simply 6122006. I think the data needs converted to date first, possibly by extracting and converting. I do not know how to do this because of the missing digit inconsistency. The table cannot be changed directly to a date field without data loss.
Thanks for any suggestions.
View 3 Replies
View Related
Sep 13, 2014
I want to retrieve and assign values of a control's properties by naming the properties. So for example:
Dim myHeight As Long
Dim myPropertName As String
myPropertyName="Height"
myHeight = 315
Forms!Myform.MyTextBox.Height = myHeight
I can retrieve the value using Eval:
Debug.Print Eval("Forms!MyForm.MyTextBox." & myPropertyName ) gives 315
How can I do the inverse operation, ie.assign the value of a property whose name I have in a string MyPropertyName? I mean other than a brute-force approach with a huge Case.
View 3 Replies
View Related
Jan 12, 2006
Hello! I'm trying to assign a number to a set of rows so I can, essentially, create a dual primary key on a table. Below is an example of what I have...
654321 | Course 1
654321 | Course 2
123456 | Course 1
123456 | Course 2
123456 | Course 3
123456 | Course 4
123456 | Course 5
The numbers are just "student numbers" if you will. Something that identifies them. The second column is basically the name of a course. What I would like to do is number each row, but only within the group of that individual.
Example:
1 | 654321 | Course 1
2 | 654321 | Course 2
1 | 123456 | Course 1
2 | 123456 | Course 2
3 | 123456 | Course 3
4 | 123456 | Course 4
5 | 123456 | Course 5
Can I accomplish this?
View 5 Replies
View Related
