Forms :: Control Option Buttons Based On Selected Date
Jun 28, 2013
I'm building a workCube reservation system and I've been tasked to have it work kind of like an airplane seat reservation system. I've laid out my form with option buttons representing the location of each available space. (space1, space2, space3...space16)
My desired outcome is to be able to select a date from a calendar popup and have the options buttons react to that date if they have been reserved. (change color and indicate "reserved").I've tried to create the form based on a query which represents the "booked" table.
Tables:
Employee
(k)empID
emplyeeName
Space
(k)spaceID
space
Booked
(k)spaceID
(k)empID
(k)bookdate
Some rules a space can be booked by any ONE employee on any day.How can I get any and all of the option buttons to react if there is a reservation in place on the day indicated by the calendar?
I have 2 Option buttons that I want to use to control a combo box. If I select Option1 then I want it to pull from one table for the drop-down choices. If I select Option2 I want it to pull from a different table. The Option buttons and combo box are all on the same form.
I'm looking to have either a combo box,, or 2 options buttons (whichever is easiest) that set a date field based on what is selected in the combo box/ option buttons.
The variables are 'Payment in 30 days" " Payment upfront"
if "payment in 30 days" is selected the date field on the form will enter the date as + 30 days from todays date if "payment upfront" is selected the field on the form will enter todays date.
This date field must be blank unless an option is selected, as this information is only entered in a later stage of the form.
I've tried a few different ways to enter this but i can't quite get it to work as i want.
I'm very good with utilizing the access tools however I can only code in vb editor minimally. What I'm looking to do is have the option buttons control two combo boxes. One to search by user name and the other to search by serial #. I've created an option group with two buttons I set the default values in the combo boxes in accordance with the option buttons However, the option buttons aren't doing what they are supposed to do. I've been told I need to tweak the code for the buttons in order to make them control the combo boxes. Does anybody know what I need to do to make this happen? Ultimately the user will be able to click either of the buttons to perform a search through a single combo box.
Thanks to everyone out there for making this possible. Your expert knowledge will help me grow into an expert myself.
I have a form that is filter based on a combo box. I would like to add another filter for date. but the code I'm using for the first combo box doesn't work for date.
the code is:
Sub SetFilter() Dim LSQL As String LSQL = "select * from Preventive_Q_View" LSQL = LSQL & " where Item_Name = '" & Combo206 & "'" Form_Preventive_View.RecordSource = LSQL End Sub
How do I modify this code to work with the date combo box? Also, is there a way to get both filters to work together, as in filter based on the first combo OR the second combo, OR both?
how to use option buttons? I've looked around, but I cant find any site, thread, etc, etc on how to fully use them. I have 3 option buttons, there "Retired" "Current" and "Not Stocking" I want them to be tied the the list box named "lstItems" that gets its info from a qryItems.
I am doing a worksheet for college and have been asked to create option groups on a form, but I cannot work out how to do this.
The screenshot shows what I have to do but I cannot get the option group wizard to open.
When creating my form based on the design in the screenshot I dragged the Rate field onto the design view sheet but it has only one option button connected to it, I need to add another one that will be connected to the same field and am not sure how to do it. I did try adding another option button from the control bar but I am not sure if is connected to the same field with the correct yes/no properties.
Can you update a text box on a form based on input of a date control? Here is what I have. I have several date controls on my form, and I want to update a status textbox based on which of these date boxes is filled out, but I need the status to be filled into the table as well. Do I update the field on the table, and then requery the text box? Is there some other method for accomplishing this?
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
I have an option group with two toggle buttons. Is it possible to set up the option group such that only one toggle button is visible at any given time (i.e. the unselected option) So the group has a default value. Clicking the visible button should switch the value, hide the button (option) associated with that value and show the alternate button (option) for the alternate value?
Basically only having one visible button at any given time which toggles between the two values (but I'd like to retain it as an option group, rather than as two independent buttons, as that gives me a handy value from which to determine control sources elsewhere)
I've tried setting the visibility of the buttons from the AfterUpdate event of the option group but it doesn't work.
I know I can do this with independent buttons but was hoping there was a quick(er) and easy way to do it with an option group instead?
I have a Combo Box bound which gets its values from a table (T_Users).
The Combo Box displays the Users 'Initials' [Column 1], but the Bound Column [Column 2] is that of the Users 'ID' (which is used when a record is edited or a new record added).
What I want to be able to do is when the user clicks the Combo Box, and the drop down list 'drops down' the options, I want them to not only see the 'Initials' but also selected other columns - BUT - when the option is selected I just want the 'Initials' to be displayed in the Combo Box.
Code: So, Normal > | ABC |
Dropped Down > | ABC | -------------------------------------------- | ABC (Annabel Carcus, Big Company Ltd.) | | JB (Joe Bloggs, Medium Company Ltd.) | | FS (Fred Smith, Little Company Ltd.) |
I want to put three buttons on a form to filter records (Filter by form), a clear form button and one that applies the filter (Apply Filter) similar to those on the toolbar. The wizard for control buttons in the toolbox isn't helpinjg much. Any ideas?
I am not even sure where to start with this small problem that will make a big difference.
I have a database that produces yearend accounts, its highly specialized to my industry.
The year end accounts have schedules these can be 1 to 3
On my form I have it set up for 3 schedules, but can be used for 1 and 2 schedules accounts.
However when it come to the reports for layout reasons 3 of the 14 reports needed are tailored to a 1, 2 or 3 schedule, and i have created reports and buttons on the form according to the number of schedules for that account.
What I want to know is this, I have a field on my form that states the number of schedule for that account, is it possible that if say the account i am working on is a 2 schedule account, that it disables the 1 and 3 buttons?
I have a form that our operators use to do their hourly quality audits on. This is getting to be a huge burden on them because right now, they enter the date, the week ending date, the month every time they have to do an entry, and for me it is a nightmare because they can still enter the wrong information. So, what I was wondering is if there is a way that I can have them select the date from a combo box (easy enough), but from that, have the week ending date and the month fields automatically update as well. Any advice? I would really appreciate it! Thanks so much!!!!
I have a form with about 30 controls. I organized it carefully so that all the controls show on a single page. It actually looks really good. However, several of the controls allow multiple values. These appear as a check box showing up beside each item in the list from which these controls take their information. When I run a Filter by Form process, the form flawlessly pulls the data from the table that I'm seeking, and the check boxes are visible, both the ones with checks and without. In a few cases, in order to fit everything onto one page, I have most of the related list hidden, and use scroll bars. This works really well for data entry and for editing individual records.
Where it DOESN'T work like I want it to is in situations where the checked item(s) in the multi-value control don't show up in the box on the form without scrolling. In the table where these multi-value fields actually live, what shows up is just the code for each option, a simple numeral, with commas separating any multiple values. Is there a way to make my form show only the selected codes like in the table? My suspicion is that I'm going to be told no, that the best way to do this is to use a report and query.
This frame controls an option group. If they are in an existing citation and want to start one for another type, this offers to write a new record in when they try to switch. Problem is, if it DOES write the new record, it seems to be saving the old record, and thus both will end up 56, for example. Access seems to be ignoring/overwriting the Me.frameCitationType.Undo (I don't want to use Me.Undo because they may have made other changes as well).
If the user does not spawn the new citation, it undoes fine. I suspect the problem may be the Filter/FilterOn?
Code: Private Sub frameCitationType_BeforeUpdate(Cancel As Integer) Dim chap As Integer Dim othercit As Variant Dim curRecord As DAO.Recordset Dim curDefend As DAO.Recordset If Me.NewRecord = True And IsNull(Me.CaseNumber) Then MsgBox "Enter the Service Order and Increment first, please.", vbExclamation
I need to pass a criteria to a query from my option group control to my query.
It contains three options 1,2 and 3.
If option 3 then Pricing Type 1 and 2
How do I make the code below working?
IIf([Forms]![FrmUserSelection]![PricingType] Like 3,([dbo_AGPricingDiscounts].[PricingType])="2" Or ([dbo_AGPricingDiscounts].[PricingType])="1",",[Forms]![FrmUserSelection]![PricingType]")
I am building a form in access and I am trying to find a way where user input isn't possible in the associated textbox when "No" from on option box is selected.
I have a form that request information from the user (StartDate, StartTime, EndDate and EndTime) the problem is that it's not working. The only way I can get any data to show is when I remove the StartTime and EndTime. Only then will it pull the items from the StartDate and EndDate.
Here is what I have as my criteria: Between [Forms]![OpPROD_ALL]![StartTime] And [Forms]![ OpPROD_ALL]![EndTime] And Between [Forms]![ OpPROD_ALL]![StartDate] And [Forms]![ OpPROD_ALL]![EndDate]
The users will be able to request a report based on a start and end date along with a start time and end time.
Side note: this is to pull date for 3rd shift (Example) 4/14/2013 10:00PM - 4/15/2013 10PM
I want to delete certain records based on the selected date. However, I come across with this is error - Run time error '3464' (Data type mismatch in criteria expression).This part is highlighted in yellow. I even used the debug.print to test out if the sql statement is executed properly.
Code: DoCmd.RunSQL DelSummarySQL
Here is my full code
Code: Private Sub cmd_Delete_Click() Dim DelSummarySQL As String Dim StartRange As Date
I create a database through ms access and there have a birth date box and admission date. Another box for Age.I want to see the age in month or year figure in to the age box when I go next field. Which will be calculate from admission date to birth date.
I have been tryign to work with Option Buttons and am not having much success. I have been looking on line for examples and I get close.
The example tells me to Set the GroupName Property although I can not seem to find it.
Basically what I do is use the wizard and select the Option Group and add that to the form. With the wizard I enter three Label Names and take the default Values. I then add a Control Button and use the code below.
Result: Everytime I click the Control Button it gives me all three MsgBox's. Its reading all the values in the Option Group NOT the one that is selected??????
CODE: Private Sub Command11_Click()
Dim x As Control
For Each x In Me.Controls
If InStr(x.Name, "Value1") Then MsgBox "You Selected Value1" ElseIf InStr(x.Name, "Value2") Then MsgBox "You Selected Value2" ElseIf InStr(x.Name, "Value3") Then MsgBox "You Selected Value3"
End If Next End Sub
I HAVE BEEN TRYING A FEW VARIATIONS AND I GET ERRORS WHEN USING THEM: 1. I changed the .Caption to .Name...IF I USE CAPTION it tells me that this "Object does not support this property or method" 'Check for the string "Option" within the caption of each control. If InStr(x.Caption, "Option") Then
2. Dont knwo where GroupName is 'Check the group name. If x.GroupName = "mygroup1" Then MsgBox x.Caption
3. Value gets an error 'Check the status of the option button. If x.Value = True Then
