Modules & VBA :: Linking All Option Groups
Mar 13, 2014
I have 26 different option groups all with numeric values set for YES , NO, and N/A.
I attempted code to have the code read if the frame values were 1 Or 3 for all frames then a text field would read as "Pass" or it would be "Fail" but its not working. How to link all the options groups so that if YES or N/A have been selected then it will generate a PASS but if any of them selected NO it will be a FAIL.
View Replies
ADVERTISEMENT
Jan 13, 2006
Hello Everyone.
I have a form that gets its data from a query.
There is a field in the query called "FinalisedDate" which is a date/time field. I want a button called Current that when pressed it shows all records where the FinalisedDate field is Null which is to be the default of when the form is open.. Another button called "Aged" is pressed it only shows records that have the FinalisedDate field has a value (i.e. not null). I want another button that shows All Records (i.e Current and Aged).
I hope anyone can help. I have searched the forums but did not find a similar problem that I can copy.
Regards
View 1 Replies
View Related
Nov 23, 2004
This is a multi-faceted question may the answer to the first may help the second.
I have two option groups each with two options in each.
The first is called Frame 57 and has two options A ( the wizard assigned a value of 1) and B (assigned a value of two).
The second is called frame 58 and has two options C ( the wizard assigned a value of 1) and D (assigned a value of 2).
I have set enable on Frame 58 to No.
My aim:
If I choose A in Frame 57 then I want Frame 58 (with both options) to become enabled.
If I choose B in Frame 57 then I want Frame 58 to remain un-enabled.
When writing the code do I
Put it in the Click event of the FRAME?
and should i refer to the option groups by their name (ie: A or B) or by their assigned value (1 or 2).
This is what I have at the moment
Private Sub Frame57_Click()
If Frame.57 = 1 Then
Frame58.Enabled = True
Else
Frame58.Enabled = False
End If
End Sub
This seems to work though when I return close and re-open the form Frame 58 (even if it was chosen and enabled) is now not enabled even though the option is Frame 57 is correct and visible.
Hope this makes sense - any help appreciated
View 4 Replies
View Related
Mar 19, 2008
I'm trying to create a form for entering data for new items for a warehouse inventory. So far, I've figured everything out, but now I'm stuck.
I want to create an option group for two separate snippets of information: Whether a product is damaged or not, and whether a product is in numerical order or not.
I have created two bound option groups with option buttons, one for "Damaged?" (Yes or no) and one for "Sequential?" (Yes or no).
When I open the form, however, only the "Damaged?" buttons work. I can click either one, and it changes from yes to no and vice versa. However, the "Sequential?" options do not work. It doesn't matter which option group I try to click first, I cannot select "Yes" or "No" under "Sequential.
Any input would be greatly appreciated!! Thank you!
View 1 Replies
View Related
Mar 24, 2006
Been searching for an answer to this one but still cant quite get it.
I am using an option group to subtract and add percentages on an amount in a text box. This is the code i am using but there is something wrong. My syntax is out.
Me.TechsRate = ((Me.Chargeout.Text - (Me.Option17.OptionValue /100))
I am trying to calculate 5% or 10% or 15% and so on, up to 35%
Thank you in advance
View 8 Replies
View Related
May 18, 2005
In the file MembershipV3A2K.zip that was posted at the link listed below...I found a form that had a feature I would like to use or create on my own. I'm not sure what to call this feature. But it looks as if the form has two option groups and a listing of all committee members. In one of the option groups you selected which report you wanted. The second group you selected your output method for the report. The form in the database posted is labeled as frmPreReport but I was not able to get this form to work, so I think various components are either disabled or removed???
I'm not familiar with visual basic and want to know if there is a way to create this feature without visual basic knowledge? If so, would anyone be able to point me in the right direction? If visual basic knowledge is required, what would be a good source for this information?
http://www.access-programmers.co.uk/forums/showthread.php?t=85876
View 4 Replies
View Related
Jun 29, 2005
I have a form with 6 option groups, each with 2 option boxes (-1 & 0). They are triple-states and start off in null mode with a validation rule of "Not Null". The idea is to ensure the user has decided something for each option group before being allowed to save the record.
The problem is that each time I load the form, the first box I select, all the others then default to the same option (no longer null).
Any Ideas?
Thanks,
Ben
View 2 Replies
View Related
Aug 8, 2005
Sorry if this is an easy one and I just missing it, but I have a form in an Access2003 database with option groups for ratings for 18 individual tasks ie:
Safety: 1. Satisfactory 2. Marginal 3. Unsatisfactory 4. N/A
The value stored in the table is 1,2,3, or 4 for each one, obviously.
How can I change the stored value in the table to "Sat" "Marginal" "Unsat" etc?
Or, if easier, make the report convert the numerical values to names?
View 4 Replies
View Related
May 13, 2013
How to create a Web Form and include an option group (5 or 6 radio or check boxes)? I really need the page to layout all of the options (not in a drop down). This will allow users compare answers on the fly looking at the form.
View 2 Replies
View Related
Nov 14, 2013
I have a report with 2 option groups, I cannot get both of them to filter the data simataneously, they will each inititally filter the data, but when the opposite group it clicked, the previous filter data does not remain filtered. I have posted the code for the two option groups, I know I'm doing something wrong.
First option group code:
Private Sub Frame43_Click()
Select Case Me.Frame43.VALUE
Case 1
Me.Filter = "allowable_weight Like '263000'"
Me.FilterOn = True
[Code] .....
View 5 Replies
View Related
Aug 13, 2006
Hi there
Is there any way to control the "show" criteria in a query from option groups... i.e... a check box for someone to say if they want to view items in the query or not? (But not to affect the actualy query data in any way).
Cheers!
View 6 Replies
View Related
Dec 11, 2013
I've created a form using the form wizard and all of the fields show up as combo boxes. I would like to change a couple of them to option groups with radio buttons. Is there anyway to do this without deleting the fields and making the option boxes from scratch? The reason I ask is because when I do the option boxes from scratch with the wizard, it alters the way the information shows up in the datasheet (it's a split form).
View 2 Replies
View Related
Apr 15, 2014
I have a query that has 2 fields of currency labour rates (current rate and baseline rate), but sometimes there are some blanks in either of the fields and is causing my text field which has a Sum formula (Rates x Hours) to #ERROR and throws out my other calcs. The only way to find out which blank line items are throwing my query numbers out is to manually type in "Is Null" in the criteria.
However, I would like to keep this process fully automated so I tried to create 2 lots of option buttons for my form, one for each of the 2 fields of currency labour rates and after I click on either option button and then run my query it will show all the lines that have blanks. I was able to link 2 text boxes to the option buttons (Select Case - Case 1 - Me.txtBox1.Value = "Is Null") and then link the text boxes to the criteria field using [Forms]![frm_labour]![txtBox1]. However, none of this seems to be driving my criteria in my query.
View 1 Replies
View Related
May 12, 2014
I have a series of records that I would like organised into groups.For example everyone with the surname Jones who lives in Wales and is between 18-30 years old.I would like a Combobox that has that group sorting visible in some way, possibly with colours.for Example if i had the records:
First Name Surname Country Age
Dave Jones Wales 24
Bob Jones England 28
Fred Jones Wales 19
Jim Jones Wales 22
Ian Jones England 29
Frank Smith Scotland 32
I would like a Combo box that shows the names Dave , Fred and Jim with a background colour of Red then Bob and Ian with a background colour of white and Frank with a background colour of blue.how I group (maybe you can add spaces between the names Dave , Fred & Jim and bob & Ian).
View 2 Replies
View Related
Jul 4, 2013
I have a table with two fields like this:
F1 F2
110 1
110 1
111 1
111 1
111 1
112 1
112 1
.....
I need to change the number in F2 like this
F1 F2
110 1
110 2
111 1
111 2
111 3
112 1
112 2
.....
View 5 Replies
View Related
Dec 29, 2014
I have a number of groups in a particular database. These are based on the month that they relate to, but they are also split into four separate groups for each month. So for example, I will have four groups for November 2014:
November 2014 Raw Data (which contains linked tables in another database)
November 2014 (which contains the bulk of the queries that are used for processing)
November 2014 Reporting (which are the queries that are used for month end reporting - obviously)
November 2014 Misc (anything that doesn't fit into the above, although there are always queries in these groups)
Now, I have been using this database since 2012, so as you can imagine there are quite a significant number of groups. Adding queries to new groups for each new month is therefore starting to take a while by scrolling down to the bottom... Is there a way to do this by using VBA? It would save a bit of time each month.
View 6 Replies
View Related
Mar 10, 2014
I have put together a VBA sub to run Outlook.Application to send a report to selected email addresses. A Table's records contain an email addresses as well as category for grouping purposes.
I use a "Create Table Query" to extract the selected email addresses from the table into a temporary table called "ETransferAddress" then "Set rst = CurrentDb.OpenRecordset("ETransferAddress")" then concatenate the email addresses separated with commas.
This works fine for small groups, but the service provider blocks them if the number of email addresses go into the hundreds.
What I need is to break the email addresses into sub groups and then create a series of emails all with the same Report, Subject and Content.
One way might be to create a series of loops to create a number of smaller tables but to string that lot together to achieve it is beyond me at present.
Here is my code to date"
Dim appOutLook As Outlook.Application
Dim MailOutLook As Outlook.MailItem
Dim strPath As String
Dim strFilter As String
Dim strFile As String
Dim rst As DAO.Recordset
'Create a table with selected addresses
[Code] .....
View 2 Replies
View Related
Sep 4, 2013
I have table with a list description and prices. However, some of the descriptions are the same but with differernt prices. If I create a combo box just want user to select description, how can I make use of this table in the combo box but only showing each descrpiton as a unique option?
View 3 Replies
View Related
Jul 16, 2015
I have a form that has several drop down menus on it. I use the form to filter the database to only the options that are put into the drop down windows. I have it set up so that every window does not need to be filled in for the filter to work. Now I am trying to figure out how to put the option of a date range on my form as well. The code that I am using to make everything up to the date range work is.
Code:
Private Sub Search_Button_Click()
DoCmd.Close acForm, "Admin_CompletedPartSearch"
str_Form = "Admin_CompletedPartSearch"
str_Filter = "(1=1)"
[Code] ....
I can't figure out what I would need to do to make a date range also fit into this code but not to be required.
View 1 Replies
View Related
May 2, 2014
I have a date field in a form fed by an option group. Most of the options return the correct values, but I'm having a hard time with this:
If the inspection date (in another form) is in Jan Feb or March, then return the date 1 Apr of the inspection year. If not, then return 1 Apr of the following year.
Here is the trouble line:
Code:
Case 2
IIf (Month([Forms]![FrmGeneralInspection]![txtInspectionDate]) <= 3), Me![txtReInspectionDate] = DateSerial(Year([Forms]![FrmGeneralInspection]![txtInspectionDate]) + 1, 4, 1), Me![txtReInspectionDate] = DateSerial(Year([Forms]![FrmGeneralInspection]![txtInspectionDate]) + 2, 4, 1)
View 4 Replies
View Related
Mar 14, 2008
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
View 2 Replies
View Related
Aug 27, 2014
I have a data base in access 2007, and I'm trying to add into my code one option that includes in the CC: field contacts that I already have in my DB.
This is my code:
Dim rs As Recordset
Dim vRecipientList As String
Dim vMsg As String
Dim vSubject As String
[Code] ......
View 7 Replies
View Related
Jun 16, 2014
I have an option group with 2 buttons in it, yes and no. It is set to default to No, but if someone hits Yes I want it to enable or turn on the next option group. Would just simply changing visible status disable it? Because I have a series of codes set up based on the second option group which read as:
Code:
Private Sub NumberOfAdditionalSites_Option1_GotFocus()
Me.AdditionalSitesLabel1.Visible = True
Me.AdditionalSitesText1.Visible = True
End Sub
[Code] .....
I do not want these to be visible if the initial option group is still set to no.
View 4 Replies
View Related
Aug 1, 2013
how I can have a shortcut option when right click on each item on the list box. So I got my answer with below code that opens another form "frmshortcut" with a listbox inside that shows list of options like "new task" , "edit item" . Now my problem is (like attached picture) the shortcut list (frmshortcut) will be open in another place when I right click the mouse, it is far from location of click. Also it shows some default in access when I right click in the listbox ("subform", "cut", "copy"), actually I do not like it shows these, just I like it shows shortcut list I have defined by the list box.
Private Sub ItemList_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) Const RIGHTBUTTON = 2 If Button = RIGHTBUTTON Then DoCmd.OpenForm "frmshortcut"
' DoCmd.OpenForm "frmshortcut", acNormal, , , , acDialog
Forms!frmshortcut!txtparameter = Me.ItemList.Value
End If
End Sub
View 1 Replies
View Related
May 14, 2014
how i would filter a form using an option button. E.g i want to be able to click an option button that is called Filter user and it will filter the query based on who is logged in? and a Filter all option that will clear the filter and show all records?
View 3 Replies
View Related
Aug 18, 2006
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.
View 3 Replies
View Related