I have a unbound field form that I am using as a survey. For one example I have a question with several different optional answers (1=high, 2=medium, 3=low) How and where should I update my table with the actual answer if a user picks button 1, 2 or 3 to read in my table high, medium or low.
View RepliesI have an option group, with of course the button where you select and beside that is the label name.
On click this runs a query but my boss only wants it to run when you hit the actual select button and not the label name.
how can I disable the label name or unreferenced this to the option.
I have an option group with 3 options. The labels are black. I would like to change the label to red for the given option that was choosen.
Option group name: OptionCarrier
Options: Option1, Option2 and Option3
Labels:Land, Sea and Air
Thanks for the help - John
Hi,
Newbie needing a shove in the right direction. My option group will be confusing for a user because it defaults to the Male selection
of the Male / Female option. In other words, as the user views the form to scroll through the records, the option button will always be at the Male selection, regardless of what was originally selected to update the table field. Is it possible to hide the option group once it has been used to input that record, or, have it display the correct selection for that particular record?
I stumbled upon the Option Group function just yesterday and, happy as a clam, I created a group with 2 options in radio button style. I assigned the values to a field called Registration_Type as the 2 options are "Confirmed Registrants" and "Prospective Attendees".
[Great. That part works well. When I look at the table, a 1 or a 2 is in that field so it's great to know how to control accidental ticking of radio buttons (previous 450 records or so didn't have this option group functionality so one might easily tick one of the buttons. So one part of controlling option group I know I can handle via the table itself for now.]
The challenge is how to ensure the user always ticks one or the other ... I went back to the main table and tested the 'required entry' option for the Registration_Type field but forcing an action like this is not ideal in my mind. The usual error message vagueness for the average user is no good and I don't want to limit the user so much.
Is there a way to simply have a popup come up warning that neither radio button was ticked? Perhaps something linked to the form - i.e., maybe "after update"?? I only learned about attaching code to before and after update on controls a couple of days ago, so not sure if this would be best approach.
Just something to let the user know that nothing has been ticked in the option group as that controls in which of 2 reports the data will show up in so any record not ticked might mean a registrant being left out, which would be rather disastrous <g>.
Hi I wonder if someone could help as I'm relatively new to this. I have tried to search for my answer but I'm not finding stuff that answers my need.
I have 1 table with products (tblProds) and 1 with stocklevels (tblprod_Stocklev). the PLU field is in both tables
tblProds tblprod_stocklev
PLU PLU
Descritption StockLevel_1
CategoryMaster StockLevel_2
CategoryGroup StockLevel_3
Category StockLevel_4 etc....
My query filters using 3 combo boxes using the category fields and the Option group sets its value to the corresponding number in the stocklevel table from a form (1 for stocklevel_1 etc). I have the category filter working as I need (ie selecting all records if left blank)
So to the question: How do I get my query to retrieve only the stocklevels for the required branch? :confused:
Any help/advice is much appreciated :)
I have an Option Group I created (simple Yes-No) in a form that links to a Yes-No field in a table. I have the default set for this field to "Yes" in the form. The option button works when the form is first opened. If I cange the option to "No", that works. Here's the tricky part that is giving me eye twitches...
If I change the option back to "Yes", the radial button doesn't reflect the change...but it does change the table data! Why do the radial buttons stop changing? Even when I close the form and open it again, the data in the table is no longer reflected with the buttons in the form.
I have 64-bit, Access 2010.
Not all the choices (numeric codes) for my form's option box are being saved to the associated table.
I am using the options choices in the option group to enter data into a table and do additional things - clicking one option is supposed put a code in the table and then take you another form, while clicking a different option will make a new option box visible so I can collect additional data.
My option group has three options, only the data from the second option, which makes a second option group visible, is being saved in the table. If someone clicks on the first or thrid option, which takes them to another form, the data from that option choice does not get saved to the table.
I’m really stuck on how to create: Check Boxes/Option button/Option Group in VBA.
Could someone help on either all of them or some of them please?
Thanks
Richard
I am using an Access database for a foreign language dictionary project.
One of the forms I use is populated by a query (qryLemmaTable) to retrieve information from tblLEMMA.
This form works precisely as I intend it to work, but there is a glitch on it that is driving me mad.
The form in question has an option group with 11 radio buttons that correspond to the parts of speech associated with each word in tblLEMMA.
When I click on the button optAdjective I apply a filter and the only records that are displayed are adjectives. (The same applies for Nouns, Verbs, Prepositions etc.)
Here is the glitch: even though the radio buttons apply the filter correctly, no “black spot” appears in the button. Other signals on the screen let me know what word type is selected, so I can accomplish what I want, but I want the “black spots” too!
Perhaps this will be a clue: For each radio button I use the following code in the GotFocus event.
Me.FilterOn = False
Me.Filter = "wordtype = 'A'" ‘(or N, etc)
Me.FilterOn = True
And this for the Lost Focus event
Me.FilterOn = False
Thanks for the help.
Hi
I've got an Option Group with 3 options; Yes, No and Future.
I also have a range of Check Boxes; 1 for every day of the week.
When one of the check boxes is selected I want the Option Group to change to Yes.
Currently, the Option Group defaults to Future and No will only be available by manually selecting it. This doesn't need to be changed.
Any help will be greatly appreciated!
Cheers
I have a table with names in it that is in a relationship with my master db. I want, if possible, to be able to automatically add a new entry to that table, allowing it to grow and remember past entries over time.
Example: Movie Database, with table listing lead actor/actress that has relationship to the Star field in database
If movie star is in table, they select name
If movie stare is NOT in table, they can add that name in and the table will be updated for future entries. then, when another movie has that same star, the name will automatically be in the list (reduce keying errors so sorts will work).
Is that possible, or do they have to manually add in new star each time in the table before they can update the database?
At present I have a form which is used to select a date range then using one of three buttons I can select one of three reports. I want to use an Option Group with three options to replace the three buttons. I have fiddled around using three separate Option Buttons and they work ok but in my opinion they are not the way to go. I need some assistance with the code as the Option Group is slightly different to the Option Buttons.
View 5 Replies View RelatedI have a very simple option group, status 1, 2 , 3 or 4. When the status of the group is changed i have the following code used to label txtStatusChangeAudit which lables who changed it based on the log in name. I have this code for each of the four options. The code works great but when i leave the form and come back to it the txtStatusChangeAudit that holds the code is now blank. When i click an option it again shows the information i want.
How do i get the form to save this information so when i leave the form and come back to it the last person to change the status will still be present?
Private Sub OpenOptionButton_GotFocus()
Me.StatusChangeAudit = "Status Open By; " & User.UserName & Space(1) & (Now)
End Sub
Thanks a million..
Fen
This should be an easy one.... I had an existing form. Needed a second form. But the two were so close I just added and option group to make certian fields visible when that option was picked. Now.... The problem is sorting or doing a query by the value of the option group. What I am thinking is I need to store the value of the option to a field. ie My option group is named "PickWO" the value is "1" or "2", so I added a field to my WO table... so how do I store the value of "1" or "2" to the new field? Hope this makes sense!
View 9 Replies View RelatedI have created an option group. There is a question and the response is yes, no or N/A. If the answer is no or N/A then I want to skip to the next question. If the answer is yes then I want to ask a follow up question. How would I make it so that when the answer is no or na and the user hits tab it would skip right over the follow up portion and move on to the next question?
View 1 Replies View RelatedI have a invoice system I have created in Access and it did used to work perfectly and then maybe an update Who knows stopped the system working.
I have an customer order screen that has customer details and then a subform within the same form this takes a total of items & costs for this order and then it entered it into the customers table from the order_Details table using me.Order_total = Order_Total.
I know this is bad design but I store it because once the order is places I need the total to be static because the invoice has been sent and so if someone changes the order then the total owed doesn't change.
I then have a reconcile form which is on a datasheet form straight from the tab;e so it is editable which has a checkbox that then once ticked copies the total from the Order_Total in the table to the reconciled field in the same table and then I use a report to show who owes me still.
So I have made a Select query from the Orders table & Order_Details table and used a Group by Order number (Which is the link between the 2 tables) this shows correctly but now not editable because of the rules So I am trying to add an editable checkbox on the same form.
I tried to use a dlookup makes all of the boxes either ticked or not. I've been looking at Recordsets but I'm unsure if this is what I need or not really
So really I just need to see if I should be putting the Total from the Subform into the mainform and then entering it into the table (Like previously) using a calculated unbound field and then using the Afterupdate event to insert the data into the table. but for some reason it just wont work.
I can get the OnClick to work but then as soon as i go to the next record for some reason it then resorts to 0.00 but then the table shows correctly which ever record the form is working on.
Or should I be using the new query based idea to create the reconcile form and if this is the best way I just don't now where to start on how to get a multiple table query that I can then add a reconciled checkbox which then copies the Order_Total from the table to the Paymet_Recieved field.
Hi,
I have a option group with several buttons. Is it possible to apply a msgbox to one of the buttons where it will ask the user "Are you sure you want to generate report to excel". I would like the user click ok to continue or cancel. I am not sure how to get this message box prior to the code running when the option button is pressed. Thanks you for your time.
Will someone look at my option group in my form (frmcustomer) and help me figure out why the option group selections for existing records nulls out (visually you cannot see which button had been previously selected).
The option group is working fine in that it is adding the appropriate selection to the record, but when you open the form up in edit mode the selection has been grayed out.
I have an Option Group with 3 choices...1,2 and 3. The default value is 2 as setup in the table default value setting.
I have a subform that has a check box and when checked I want the Option Group value to be "1" otherwise I want the default value of "2" or "3" to remain in the table. I can get all this to work through a Afterupdate code in the subform check box except the part where I want the value left at what
ever was in the option group part. Here is my code...
Private Sub Paperwork_Returned_AfterUpdate()
If Me.Paperwork_Returned = "yes" Then
Me.Parent.paperworkstatus = "1"
Else
Me.Parent.paperworkstatus = False
End If
End Subvalue
I think the problem is in the "Else" part. The if trus seems to work but if false it will not leave the previouse value in the field.
This last little thing is the last thing I need to finish up. This board has taught me so much...most of all it has taught me that when somebody ask me if I am an advanced access user, I will have to say is anyone? This program is so powerful and I can take a lifetime to master, or so it seems.
Thank you!
I have an option group set up on my form that represents four different sheets. I want to be able to select one and have a certin function occur (docmd.openquery) according to which button is selected. Any ideas? :confused:
View 1 Replies View RelatedI have an option group, with two options buttons. I need to to be a required field. (I cant) make this required at the table level, as there are already 56K records).
I've tried on the before update on the form, making the frame tag = required. For some reason this is not working. Any idea's
Dim blnContinue As Boolean
Dim ctl As Control
blnContinue = True
For Each ctl In Me.Controls
If ctl.Tag = "Required" Then
If IsNull(ctl) Then
MsgBox "Required Information Missing", vbCritical + vbOKOnly + vbDefaultButton1, "You must fill in the field indicated with red"
Cancel = True
ctl.SetFocus
Exit For
End If
End If
Next ctl
Set ctl = Nothing
End Sub
Hi, all--
Perhaps a silly question:
I want to use an option group with a seperate check box for yes and no for a series of yes/no fields. I find that when I do this, once a record is started all have these items have "no" checked. I tried defaulting the value to null and other such things, but to no avail.
Any ideas (while retaining the concept)?
Thanks.
Paul
Hello Everyone,
I'm not sure if this is possible. I have a form (link to a table) with option boxes that when I click on one of the option boxes sets a value to a field in the table. The problem is that when I check a different option box I have to manually uncheck the other option box that was previously checked. Is there a way to have this done automatically? Meaning that if I check box 1 and then box 2, when I check box 2, then box 1 has to get Unchecked.
I also tried using a group option with different option boxes and that seems to work fine as far keeping only one option box checked, but don't know how to make the checked box to store its value to a table. Please help!
:confused:
Thanks!
I thought this would be easily found by searching the forum! But I had no luck.
Having trouble with an Option Group. I have an option group with 2 options, YES and NO. Value of Yes set to -1 and value of No set to 0. The field this is bound and is set to Yes/No. The problem is.... No matter what I try it keeps assigning a value to this field in my form! The option group is the last item on the form. Date being the first..... After you enter a date, and an auto number is created, it gives the option group a value of YES or "-1" There is nothing in the default value of the radio button, the frame, or the field to which it is bound. Why is this assigning a value and how can I stop it???? This group needs to remain blank to force the user to THINK before it has a value.
I have managed to get around this by changing the bound field to "Number" instead of a "Yes/No" .... But I am concerned with future queries and filtering. So is this the only way around this problem? Setting the field to "Number"?? And where is it pulling the value of the option group from when I have everything set to null??
Thanks
Curtis
Hello All
Talk about frustrating and I am sure the answer will be easy for some.
I have a Main form with search criteria and a subform with the data. See the attached image for the layout. The data comes from a query.
I have a yes/no field called "CompletedP" that I want to use to search on. This field is to filter in/out completed jobs. The Frame is called the generic name "Frame60". I am using an option group with the choice of yes or no plus other search criteria using combo boxes. The combo box filtering is fine but the option box does not appear to form any part of the search. To search I select any of the boxes and select "Search".
I post the code here.
Any assistance would be very much appreciated.
Private Sub cmdSearch_Click()
On Error Resume Next
Dim strFilterSQL As String
Dim sSql As String
Dim sCriteria As String
sCriteria = "WHERE 1=1 "
'This code is for a specific search where you will need to enter the exact string
'The source for this code can either be from a table or query
If Me![Location] <> "" Then
sCriteria = sCriteria & " AND qrySearchCriteriaSub6.Location = """ & Location & """"
End If
If Me![Code] <> "" Then
sCriteria = sCriteria & " AND qrySearchCriteriaSub6.Code like """ & Code & "*"""
End If
If Me![ClientCode] <> "" Then
sCriteria = sCriteria & " AND qrySearchCriteriaSub6.ClientCode Like """ & ClientCode & "*"""
End If
If Me![ProjectCode] <> "" Then
sCriteria = sCriteria & " AND qrySearchCriteriaSub6.ProjectCode = """ & ProjectCode & """"
End If
If Me![StartDate] <> "" And EndDate <> "" Then
sCriteria = sCriteria & " AND qrySearchCriteriaSub6.DateAllocated between #" & Format(StartDate, "dd-mmm-yyyy") & "# and #" & Format(EndDate, "dd-mmm-yyyy") & "#"
End If
Select Case Me.Frame60.Value
Case 1
strFilterSQL = sSql & " Where [CompletedP] = -1;"
Case 2
strFilterSQL = sSql & " Where [CompletedP] = 0;"
Case Else
strFilterSQL = sSql & ";"
End Select
If Nz(DCount("*", "qrySearchCriteriaSub6", Right(sCriteria, Len(sCriteria) - 14)), 0) > 0 Then
sSql = "SELECT DISTINCT [JobID],[Location],[Premises Details],[ProjectCode],[Code],[ClientCode],[DateAllocated],[CompletedP],[FileNumber] from qrySearchCriteriaSub6 " & sCriteria
Forms![frmSearchCriteriaMain6]![frmSearchCriteriaSub6].Form.RecordSource = sSql
Forms![frmSearchCriteriaMain6]![frmSearchCriteriaSub6].Form.Requery
Else
MsgBox "The search failed find any records" & vbCr & vbCr & _
"that matches your search criteria?", vbOKOnly + vbQuestion, "Search Record"
End If
End Sub