Change A Listbox Recordsource With The Use Of Option Buttons
May 27, 2005
Good afternoon
I have been helped out so many times in the past here I thought I would try my luck again.
Is it possible with the use of option buttons to change the row source of a listbox?
I want to use the listbox for a search criteria and thought it might be easier to have 1 listbox been updated from the choices made using a group of buttons.
I would like like the row source to be based on different tables maybe I might need to use queries.
Can anyone point me in the right direction?
View Replies
ADVERTISEMENT
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 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
May 27, 2005
How do I determine what value my listbox has?
Here is what generates the records from Form 2:
If Not IsNull(Me.[StartDate]) And Not IsNull(Me.[EndDate]) Then
strCriteria = strCriteria & "tblWO.Created Between #" & _
Format(Me.[StartDate], "m/d/yyyy") & "# And #" & _
Format(Me.[EndDate], "m/d/yyyy") & "#"
strSql = "SELECT DISTINCT [WOnumber],[Requested],[UDF1],[RequestedBy]," & _
"[Status],[property],[asset]" & _
"FROM tblWO " & strCriteria
Forms("frmFilter").Listbox1.RowSource = strSql
What I am trying to do is trigger a message box from the onclick of a command button on Form 2 and read the listbox # records on Form 1. It's gotta be something simple in my syntax. Search hasnt provided this scenario for me. I have tried these and more:
'If Forms("frmFilter").RecordsetClone.RecordCount = 0 Then
'If IsNull(Forms("frmFilter")).Listbox1 Then
'If Forms("frmFilter").Listbox1.RowSource = 0 Then
'If Forms("frmFilter").Listbox1.RowSource = Null Then
'If [Forms]![FrmFilter]![Listbox1.recordcount] = 0 Then
'If Forms("frmFilter").Listbox1.RecordCount = 0 Then
'If Forms("frmFilter").Listbox1.RecordCount = "" Then
'If Forms("frmFilter").Listbox1.RecordCount = Null Then
MsgBox "Sorry, no records meet your chosen dates. Change the dates and try again."
View 2 Replies
View Related
Mar 17, 2006
Is this possible? I can't seem to find this q anywhere here so I thought I'd post.
I changed the colour of my form to white, but the Navigation Buttons at the bottom and the command buttons that I 've added stay at the default grey.
Is there anyway to change this? I right-clicked and tried changing it to white through the properties but there's nothing there that does this.
:confused:
View 2 Replies
View Related
Mar 17, 2006
Is this possible? I can't seem to find this q anywhere here so I thought I'd post.
I changed the colour of my form to white, but the Navigation Buttons at the bottom and the command buttons that I 've added stay at the default grey.
Is there anyway to change this? I right-clicked and tried changing it to white through the properties but there's nothing there that does this.
:confused:
View 4 Replies
View Related
Oct 9, 2005
I've been trying to determine what recordsource to apply to a listbox to get the following results for its three columns:
Column1 Column2 Column3
AddressID Address Owner
The data is being pulled from two tables:
tblAddress
AddressID (pk)
HouseNum
Street
Apt
tblOwner
OwnerID (pk)
AddressID (fk)
LastName
FirstName
Current
Problem: I need each record from the Address Table to be shown with the most current Owner information from the related table. The most current Owner Information record is identified by a checkmark in the 'Current' field.
I've tried the following queries:
This query gives me duplicate addresses for each instance of owners:
SELECT DISTINCTROW [AddressID], [HouseNum] & ' ' & [Street] & ' ' & [Apt] AS Address, tblOwner.LastName AS Owner FROM tblAddress LEFT JOIN tblOwner ON tblOwner.AddressID=tblAddress.AddressID;
This query gives me only addresses that have a current owner, the problem is, sometimes a house won't have any related owner record in the owner table:
SELECT DISTINCTROW [AddressID], [HouseNum] & ' ' & [Street] & ' ' & [Apt] AS Address, tblOwner.LastName AS Owner FROM tblAddress LEFT JOIN tblOwner ON tblOwner.AddressID=tblAddress.AddressID WHERE tblOwner.Current = True;
Can this even be done with a query? This is driving me nuts. Help!
Scott
View 1 Replies
View Related
Sep 4, 2006
I have a form with 5 tabs. Each tab has 2 subforms.
When the form loads I am trying to select it's recordsource by doing this:
Me!Subformname_A.RecordSource = "SELECT FieldA, FieldB FROM TableA WHERE"
However, it throws an error.
Is there something wrong with this ?
View 1 Replies
View Related
Sep 26, 2005
I have a report that can be used for 3 different queries. I've been trying for the last hour or so to get three different buttons on a form to open this report but give it an appropriate record source.
I figured there's got to be a way that's easier than three queries, and three reports...?
I was trying to use the same format as with forms :
[Reports]![rptReportName].recordsource = "qryQueryName"
or variations of that. Am I way off? It keeps saying that I've misspelled the name or it doesn't exist.
View 7 Replies
View Related
Jan 15, 2006
Hi,
I want to write Visual Basic language in the form with one button:
I have one form named "setForm" with one button and one text box:
Let's set the new table "frm2", the new form "frm2"
Dim sql As String
sql = "SELECT [model].* INTO frm2 FROM [model]"
CurrentDb.Execute sql
DoCmd.CopyObject CurrentDb.Name, "frm2", acForm, "frm1"
Forms!frm2.RecordSource = "frm2"
The last statement code doesn't work: It is said that Microsoft Access cannot find the form "frm2" referred to in a macro expression or visual basic code.
How can I change the recordsource? Thanks.
View 1 Replies
View Related
Sep 27, 2006
I have a form that is based on a query. I would like to change the form's RecordSource to another query using SetValue in a Macro.
Under Action Arguments I have
Item: Forms![Receiving Query subform].RecordSource
But I don't know what to put for an expression. I would like to use the same form but base the RecordSource on a query called "Receiving Search by Date". :eek:
Steve
View 4 Replies
View Related
Mar 13, 2014
I know this is probably already in the forum but it is getting pretty big and I can't find the answer. I have this:
frmMain frmMainSub frmMainSubSub recordsource = query1
How do I change query1 to query2?
View 2 Replies
View Related
Aug 18, 2006
How do i make my subfrm record source switch to another saved query (qryPendingStatus) when it's opened from the form.
Heres what i am trying to accomplish:
I have a subfrm that i'd like to use to display info in 2 different forms.
There's a form currently for All statuses. Then another new one for Pending status. I'd like to use the same subform for this pending status form also, and in doing that my qryAllStatuses, but change to qryPendingStatus on the subfrm when i open the mainfrom.
This is on the open even ofthe mainform, but does not work (says method not founds...so obviouly i can't use ".Recordsource" here:
Private Sub Form_Open(Cancel As Integer)
Me.subfrmJobInfo.RecordSource = "qryPendingStatus"
End Sub
How can i make this happen?
View 3 Replies
View Related
Apr 4, 2006
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
View 3 Replies
View Related
May 26, 2006
Below is the code that I used to make a Menu. The only problem is that when a report is opened, it is placed under the Menu form instead of on top of it.
How can I get it to stay on top?
Private Sub Frame2_Click()
DoCmd.Restore
On Error GoTo MyTrap
Select Case Me.Frame2
Case Is = 1
DoCmd.OpenForm "Resident from Last Name", acNormal
Case Is = 2
DoCmd.OpenForm "Resident from Phone No", acNormal
Case Is = 3
DoCmd.OpenForm "Resident from Address", acNormal
Case Is = 4
DoCmd.OpenReport "Multiple Addresses", acViewPreview
Case Is = 5
DoCmd.OpenReport "Missing Phone Numbers", acViewPreview
Case Is = 6
DoCmd.OpenForm "Update/Add/Modify PGIDdb"
Case Is = 7
DoCmd.OpenForm "Delete Records", acNormal
Case Is = 8
DoCmd.OpenReport "PrintAll", acViewPreview
End Select
MyTrap:
If Err.Number = 2501 Then
MsgBox "Action Canceled"
Else
End If
DoCmd.Close acForm, "PGMenu"
DoCmd.OpenForm "PGMenu", acNormal 'This places Menu on top of opened report etc.
End Sub
View 1 Replies
View Related
Nov 8, 2006
I need 2 option buttons created individually, as an option group has proven utterly worthless to me for what I need.
A simple Yes / No pair that toggle back and forth when clicked.
I would use an option group, but you cannot define an On Click Event Procedure on an Option group button, and I cannot set the value of an option to 1.06 or anything other than whole numbers.
I just want to set a simple On Click event for each to set a variable to one of 2 possible values.
Thanks
View 1 Replies
View Related
Apr 22, 2015
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.
View 14 Replies
View Related
Oct 4, 2005
Hi All,
Just wondered if anyone can help me with this.
I have a form based on a query that has 16 options for values in one of the fields. I wanted to put an option button for each value on a form that would allow the user to view the records based on which option buttons were selected and have the form update accordingly.
The way I've gone about it is to have some code in the after_update event thingimy of each option button that updates a boolean value in a table that's linked to the underlying query the form is based on - but this just seems a long way to go about this... plus it's not working...
I've searched the archives for clues on this but haven't come up with anything. So I just wondered, is there a better way than what I'm doing. I'm not after somebody to do this for me, just point me in the right direction.
Many thanks,
Peter
View 3 Replies
View Related
Nov 7, 2006
Hello, I wonder could anyone help, rescue and succour me.
As a former VB6 developer, I'm now working with wonderful Access VBA 2000 which makes the simplest operation such as creating a listbox or adding a control array into a living, breathing nightmare.
Today's incubus is option buttons.
Dear people, please tell me how it can be so hard to create a group of option buttons which are mutually exclusive and by whose value I can set another variable? I tried just sticking them on the screen, but then soon sobered up when I realised that Access would merrily allow me to select all of them if I so wished in joyous defiance of what an option button is actually FOR.
So I consulted the oxymoronic Help (even though it's impossible to construct an oxymoron with one word, this particular piece of functionality has somehow managed it) and was advised by same to create an option group. This I duly did - then realising that I had to set this property called Option Value 1,2, 3 etc. No sooner said than done. Anything to get it over with.
Now having different values, one would imagine that all I do is give each option button the same name. But no - control arrays in this environment would be like the discovery of the wheel in Caveman Land. So I google it and am told that I have to select the name of the option group.
Now where in all Christendom or Islamdom or NoGodsAtAllDom (in case Richard Dawkins is logged on and wants to help) can I find the name of this option group? Nowhere was I asked to assign an option group name, nowhere can I see a control that resembles an "option group", whatever that may be.
If someone could enlighten me I would be very grateful as a simple problem has once again taken hours thanks to the Access VBA environment. Grrrrrr
And thank you.
View 5 Replies
View Related
Sep 21, 2004
I have a form with a number of fields for users to enter data into, with a "Total" being calculated. The users also have the option to ignore these fields and just enter a total manually into a seperate "Totals" field.
I want to set the form up so that when the form is opened the manually entered "Totals" field is hidden, leaving users to enter the component values, with the total being calculated automatically.
However, I want to add an option button so that if users just want to type in a total manually rather than enter the component values, they click the option button and the manually entered "Totals" field appears and the other component fields become disabled. This would prevent both a calulated total and a manually entered total being entered into the form.
Any help on the code that I need to use when the option button is clicked would be greatly appreciated.
View 1 Replies
View Related
Oct 18, 2005
Hello,
I have a form named Welcome which I want to use as search menu for my database.
I have added 4 option buttons and a unique textbox into which users will write their query criteria.
My database has 4 queries and each option button should refer to one of them once selected
Obviously I will need a command button that will run the query.
Any help or code to do this? Thanks.
View 1 Replies
View Related
Jun 20, 2006
I have a switchboard which gives two selections. Upon selecting a menu item, the new menu appears. If I select from this new menu, it runs as it should do. However, upon returning to this second menu, the button remembers where it was instead of being cleared to select the same item, if desired, again. How can the option box button be cleared as do the switchboard buttons?
View 1 Replies
View Related
Feb 28, 2007
I added an Option Group / Radio Buttons to my form.
I named a few.
My question is no how to I test and run code based on the button that is selected.
If this then that?
I just am confused here.....if it was a txtbox I would say
If txtbox = ? then
End If
View 1 Replies
View Related
Sep 12, 2005
dear experts,
i am a student and i have a project to complete in 2days. i have managed to crawl through access and come up with forms and a functional query set. i need to create a search function for names and addresses. i manged to do a fisrt name search. i need to make an option for users to choose either first or last name and then search for the other details.
here is my situation, i need help connecting a radio button to a search form. allow me to illustrate my form.
************************************************** *******
first name : _________ (combo box) last name : _________ (combo box)
[0] (option button) [0] (option button)
SEARCH ( command button)
************************************************** ********
as of now, the first name combo is connected to the search button via a macro which launches the query with a value from the combo box. how do i make the user choose either option "first/last" and then make the search button search appropriately. please help me. i know this is elementary. i've spent too much time looking for a solution on my own. my time is running out to complete the project. and i've yet to create switch boards and all those other things. please! thanx all.
View 2 Replies
View Related
Mar 16, 2006
When I create an option group, the buttons or checkboxes appear to the left of the labels. Is there an easy way to make them come out on the right side of the labels? When I move them around manually it is hard to make the buttons align properly with the labels.
View 2 Replies
View Related
Apr 10, 2015
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.
View 5 Replies
View Related