hello,
I have a txtBox. Its backColor property changes according to what I do on the form. Now, when I close the form and reopen it, the backColor is not the same one with which the form was closed.
Ex. red, green
if I close the form having the backColor = green, then when I reopen it, it changes to red.
Can anyone tell me what I am missing
Thank you
Hi all,
Is it possible to change the Background color of a command button?
Whan I right click in the properties of the command button I cannot see a BackColor property. Further, when I programatically try to change the BackColor property in VBA I get an error message.
Thanks in advance
Kabir
Hi,
Is there a way to set the background color of a datasheet? I don't mean the color of the cells, but the datasheet itself outside of the rows/columns as shown below (dark grey color):
http://img.photobucket.com/albums/v368/flemmo/datasheet.gif
Thanks
Hoi,
When i'm select a record, i want to change the background color of all textfield in that record.
Does someone know how to do this?
greetings
koen
I open form and get parameter in the openArgs
I have a tabular Form
and I want change the color if the ID is aqual.
for example:
I open the form like this:
DoCmd.OpenForm "frmMessageShow", , , "fID=" & Me.fID, , , Me.AssighmentId
[the Me.AssighmentId is the openArgs]
I want in the second form to color the textbox if AssighmentId = me.openargs
I try do it:
If Me.AssighmentId = Me.OpenArgs Then
AssighmentId.BackColor = vbRed
End If
and its not work :mad:
is there is an option to do it?
thanks!
Hello,
I have the following code for changing the back-color of a field:
Private Sub txttekst1_AfterUpdate()
Dim lngRed As Long
Dim lngGreen As Long
lngGreen = RGB(0, 255, 0)
lngRed = RGB(255, 0, 0)
If Me.txttekst1 < 100 Then
Me.txttekst1.BackColor = lngRed
ElseIf Me.txttekst1 > 200 Then
Me.txttekst1.BackColor = lngGreen
End If
End Sub
Problem: When I change to record to record the back color is not
the same as I have write the code.
mulderm
I have a randomized table named tblRandomBoxes with the following data:
ID RandomID
1 4
2 5
3 2
4 6
5 1
6 3
I have 6 command buttons named command1,command2,command3, etc. and 6 Labels named Label1,Label2, Label3, etc. On Click of each command button, I want to lookup the ID based on the RandomID and set the backcolor of that label number to a different color.
ie) on command1 click me.Label4.backcolor = 39835
How can I 'build' the label number with the lookup? Here's the code I'm trying, but it doesn't recognize my 'built' label number:
Private Sub command1_Click()
Dim ctl As Control
ctl = "Label" & DLookup("ID", "tblRandomBoxes", "RandomID = 1")
Me.ctl.BackColor = 39835
End Sub
Thanks,
Sup
I am trying to change form backcolor with a cmd button via VBA.
View 6 Replies View RelatedA user requested a change that would change the form header and detail back ground color to white when they click the button print record and then change the color back all in one click after the record prints. I keeping getting a run time error, type mismatch on the line where to code is to be changed. The colors are numbers not vbColors. I am using Access 2007.
Code:
Me.FormHeader.BackColor = "#FFFFFF"
Me.Detail.BackColor = "#FFFFFF"
I am trying to color code text boxes based on the data entered in. The column is "PHASE" and the items entered in are either "1" "2" or "3". 1 is supposed to be Red, 2 Yellow, 3 Green.
I have Microsoft Access XP (I'm sure). I've tried to do it on VB and had no luck. I couldn't figure out Macro and I don't have On Click or Code Builder.
I have tried a couple of different expressions and no luck. I'm definitely an amateur to Access. I'm only using it cause it's what we have in the office.
I would like to know if this is possible using VBA ( or other method)
I want to determine the back color o a cell based on a color value stored in another cell in other word
backcolor of cell A = the value of cell B
So if I change the numbers of cell B (which is color codes) , backcolor of cells A change accordingly and it will have the color specified in cell B.
I have a subform with two fields [status] and [process], i am trying to get the backcolor of procces to change to red if the status field contains the text "expired".
I have tried vba. plced on the after update
if me.status = "expired" then
me.process.backcolor = vbred
else me.process backcolor = vbwhite
end if
this
Changes the color of the field [process] but also all process field colors to red even if the status field does not contain "expired".
I think conditional formatting is the way to go but i think i need an expression to complete this.
I wish to change the backcolor of a field on a current record being dispalyed in a 'multiple items' form. However when using me.A.backcolor = makes refrence to all fields called A on the 'multiple items' form and therefore all fields change colour not just the current record.
View 2 Replies View RelatedI have a problem. The problem is that I have a form contains two list boxes controls and a calender control. The calender control is invisible by default.
When I click a Show button, to show the calender contol, it appears but behind the list boxes controls. How can I allow it to fully appear on top of all the controls in the form.
Thanks,
I have never used the tag property but while reviewing some design stuff it occurred to me that maybe I am overlooking it's usefulness and was wondering how some of you may have used it...?
View 8 Replies View RelatedPlease pardon my ignorance, but how do I set up a ActiveX calendar in Access? The help files are missing from the version of Access 2000 I am using, and I really don't know what I am doing. I would be grateful for any help with this.
Thanks.
Hi all
I have searched through this forum and on google, and I know that I can refer to a combobox's column property IN VBA by
[myform]![mycombobox].column(1)
When I do this in SQL, it complains that there is an "unidentified function" (column). What am I doing wrong?
How do I set the Required property for field that already exists via SQL. I'm thinking along the lines of: ALTER TABLE table1 ALTER COLUMN field1 text(50) NOT REQUIRED.
But this doesn't work, any clues?
I'd like to create a table with 240 fields. I know that the max is 255, however, I'm getting a message "property value too large" after I've created 114. Any ideas? All the number fields are byte size. Thanks!
View 10 Replies View RelatedI build a form with Combo Boxes, and can not find "DropDownList property".
Can anybody help me.
Thanks
I guess I have too many columns in my database and I'm getting the error message "Property value is too large" when trying to open the database table. When I was using Access 2000, I was still able to open the database but using Access 2003, the database will not open. Is there a way around this so I can open the table to fix it?
View 14 Replies View RelatedWhat I'd like to do is for my combo boxes to say something like "Select One" when the form is first loaded, until the user opens the box and selects something. My combo boxes work fine now, but they are currently empty when the form loads.
From my google research it appeared that the OnLoad property would probably help me do what I want, but I can't seem to find this property anywhere in Access. It's not anywhere in the property window and the help search doesn't return any results.
I'm using Access 2003 from MS Office Professional Edition 2003.
Am I missing an upgrade or does my version not have this property, or am I just missing it?
Hi all
I have a lstbox on a bound form. the lstbox is based on a query. I want the first item in the box to be selected. This is what ive used:
Private Sub roll_class_select_AfterUpdate()
DoCmd.Requery "lststudents"
Me.lststudents.Selected(0) = True
End Sub
But then the form gets stuck. None of the other controls will work. The first list item is selected but it then wants to be the centre of attention and everything else can bugger off.
Any ideas as to how I can fix it??
Damon
When I attempt to run my results page with paging I get the following error:
ADODB.Recordset error '800a0cb3'
Object or provider is not capable of performing requested operation.
/slug/revslug/Administrators/AdminReports/Timesheet/TechnicianAllocation.asp, line 185
I have included a few key lines of code:
Code:strDBPath = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & Server.Mappath("/slug/RevSLUG/DB/TimesheetDB.mdb") & ";"if strTechName = "All" Then strSQL = "Select " & cstr(strReportType) & ", SUM(Hours) as SumOfHours FROM Results WHERE (PerDate >= #" & cdate(strStartDate) & "# and PerDate <= #" & cdate(strEndDate) & "#) GROUP BY " & cstr(strReportType) &";"ElsestrSQL = "Select " & cstr(strReportType) & ", SUM(Hours) as SumOfHours FROM Results WHERE (PerDate >= #" & cdate(strStartDate) & "# and PerDate <= #" & cdate(strEndDate) & "# and TechName = '" & cstr(strtechname) & "') GROUP BY " & cstr(strReportType) &";"End IfSet rstSearch = Server.CreateObject("ADODB.Recordset")rstSearch.PageSize = PAGE_SIZErstSearch.CacheSize = PAGE_SIZE' Open our recordsetrstSearch.Open strSQL,strdbpathiRecordCount = rstSearch.RecordCountiPageCount = rstSearch.PageCount' Move to the page we need to show.rstSearch.AbsolutePage = iPageCurrent'this is line that contains the error(line 185)
How can I fix this problem...I think it has to do with the settings when I open the DB but I don't know what the settings should be to make it work correctly.
Thanks
Mark
I have a subform (subform1) which allows me to select a value which then dictates which record is shown in the other subform (subform2). I want to run a macro every time subform2 has a different value -- without me having to click anywhere in subform2. I have tried to attach the macro to every place I can think of and it just doesn't seem to run. I am thinking it is because subform2 isn't receiving the focus. How do I give subform2 the focus and which event property should I be trying for?
View 1 Replies View RelatedIs there a way to change the background color of an field that has enable = off from the default "gray"? I can set it to transparent but I can't change the font color to see the data clearly.
Just trying to make the form "nice looking" to the user.
Thanks
Jeff