i want the user to make a selection from one of two option boxes, with the choice that they make i want a list box to appear straight away, depending on there selection, can anyone help please.
Cheers
Andy
got 2 radiobuttons and i want the text further down the page to show or not show depending on the value on the radio buttons.
I have tryed making an IF, but it doesnt want to update when i change post, or when i start the form, the radio button get the correct button according to the table but the text wont show any way untill i reclick the radiobutton.
dont know if u got what i ment but if u didnt ill try to explain it more.
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
Hi
I would like to make a command button appear on a form only when certain criteria is put in a control on the form.
For example, one of the controls has a drop down menu. When the user picks "Washed" from this menu I would like a comman button to appear.
The control is called status and the command button is called searchali.
so far I have tried this:in the after update of the control.
If([status] = "Washed", [searchali].visible = True, [searchali].visible = False)
or
If([status] = "Washed" then me.[searchali].visible = true else me.[searchali].visible = false)
an other variations of this and I can't get it to work. I've set the command button to visible = no to start with and the bound column of my control to 0 since I want the first column criteria.
If anyone can see where I might be going wrong, or if there is another way of doing this I would be sooooo grateful!
thanks,
Sie
My question is how can I make data in a form visible or invisible just by a button. In other words, if I have a group of buttons, based on the button selected I would want certain data to appear.
I know that this is possible, I have seen it done but just cannot find out how to do it or what this is called to look it up in Helps.
Thanks,
****
Hi guys,
I have a form (frmMain) which contains 3 subforms and they are being set to visible at different stages of application run (depending on the options selected).
In subfrm_Main_options i have 3 buttons, clicking on 'Job Review' will make the subfrm_Search visible. In the subfrm_Search i have 2 labels, 'View Jobs' and 'View Report' and I only want the 'View Jobs' to be visible!
I have tried setting the visible property of this label to False in the subfrm_Main_Options but its giving me an error (saying the form subfrm_Search is closed or does not exist in the database!). I also tried using a Global Variable (ViewJobs - declared in module mdlPublicVars) and set it to True once the 'Job Review' is clicked in the subfrm_Main_Options form, and then look at this in subfrm_Search and then display the correct label. However after trying to put this code in various events such as, On Open, On Got Focous, On Activation, ... i didnt get the result i wanted!
Can any1 please help me out with this. I would be really grateful!
PS. The buttons appearing on the form are placed on the frmMain, I did that to see if it appears on the main form but they must be in subfrm_Search!
The database is attached!
Thanks, Maisam
I sent a post earlier today about making a label visible in a subform! I am still working on it but still no progress!
I have a different scenario (its the same thing but trying to explain the method i'm working on):
I have one main form (frmMain) that contains 3 subforms, say subfrm1, subfrm2 and subfrm3. On Open only 1 is visible and 2 and 3 are invisible (however they are open and loaded).
By choosing an option on 1 subfrm2 becomes available! When choosing an option on subfrm1 a boolean called 'XXX' is set to true. Now i want one particular label to become visible in subfrm2 if 'XXX' is true! To do this i need to write a code to be executed when subfrm2 is appears on screen! The problem is this form is already open so how and on which event of subfrm2 can i write the code???
At the moment i'm trying to refresh subfrm2 (by using code in subfrm1) and I have placed my code on the On Load event of subfrm2. I thought this way the form will reload and the On Loand event will pick up the new value for boolean XXX and set the label to visible! Thats the idea anyway... here is the code i have in subfrm1:
XXX = True
Forms![frmMain].subfrm2.Form.Refresh
subfrm1.Visible = False
subfrm2.Visible = True
I'm not sure if refreshing the subform will result in On Load event to be executed! And i'm not even sure that the code for refreshing subfrm2 is correct. Can any1 help me with this?
I have attached the actual database on my previous post sent today, if you prefer to look at the whole thing and get a feel of the problem!
I am trying to make a button on a form visible and invisible dependant on the contents of a field in my form, any ideas?
View 3 Replies View RelatedI have the code below and am trying to have a form allow Text Box to become visible based on selected items from a List box. Why I am getting the error listed?
Compile Error: Invalid Qualifier
Code:
Private Sub specific_opt_Click()
Dim users As Control
Dim ctrler As String
Dim xx As Long
If Me.specific_opt = True Then GoTo 169
[Code] ....
I have a db I use for maintenance of equipment. I use a main form that has the equipment listed and a sub for for spare parts and linked by equip #. In the sub form I want to turn the visiblity of a specific text box turned on based on what is in a keyword textbox field in the sub form. What syntax would be the best to use and where do I put it. Have used if me.keyword = motor then me.hp.visible = true and also tried a case statement
View 6 Replies View RelatedI have several tables linking our employees to certain supervisors, etc.On the Form, there is a drop down with all employees listed that someone can select and then enter the stats required. When someone leaves the firm, I want to remove them from the form dropdown list, but not delete them from the corresponding table. I have seen this in other databases where they someone added an 'Inactive' column with a Yes/No response and when you selected the inactive - yes, that name would disappear from the form when people select names from a dropdown to enter stats.how to make the names disappear from the view in a form, but not in the table related to that form?
View 6 Replies View RelatedI am trying to set up a listbox with an option to select multiple items (I have done this and tested it with debug.print and it seems to work). I am then building a filter statement with VBA. I want to then use a button to add this statement to the filter in a subform with (a datasheet design), and then requery it.
My code below seems to be working in part. But I am getting all the items at times. Seems to work consistenly when selecting one item only, but I can't see anything wrong with my 'OR' statements when I debug.print.
Private Sub Command176_Click()
Dim i As Integer
Dim strFilter As String
Dim blnFirst As Boolean
i = 0
If Me.List163.ItemsSelected.Count = 0 Then
[Code] .....
Hi Everyone, This should be quite easy,
I have 20 text boxes in a form
Dependent on the ammount of people attending [number in Group] text box
I am trying to make the same amont of [Client#] text boxes visible
The below coding works but i cannot go any further than 1 and 2 attending, As the if and else statement cannot be continued
Im sure there is an easy way to do this -
Private Sub C_AfterUpdate()
If [Number in Group].Value = 1 Then
[Client 1].Visible = True
[Client 2].Visible = False
[Client 3].Visible = False
[Client 4].Visible = False
[Client 5].Visible = False
[Client 6].Visible = False
[Client 7].Visible = False
[Client 8].Visible = False
[Client 9].Visible = False
[Client 10].Visible = False
[Client 11].Visible = False
[Client 12].Visible = False
[Client 13].Visible = False
[Client 14].Visible = False
[Client 15].Visible = False
[Client 16].Visible = False
[Client 17].Visible = False
[Client 18].Visible = False
[Client 19].Visible = False
[Client 20].Visible = False
Else
[Number in Group].Value = 2
[Client 1].Visible = True
[Client 2].Visible = True
[Client 3].Visible = False
[Client 4].Visible = False
[Client 5].Visible = False
[Client 6].Visible = False
[Client 7].Visible = False
[Client 8].Visible = False
[Client 9].Visible = False
[Client 10].Visible = False
[Client 11].Visible = False
[Client 12].Visible = False
[Client 13].Visible = False
[Client 14].Visible = False
[Client 15].Visible = False
[Client 16].Visible = False
[Client 17].Visible = False
[Client 18].Visible = False
[Client 19].Visible = False
[Client 20].Visible = False
End If
End Sub
Thank you. AM
I am having a problem with making a textbox visible on a form if a checkbox is checked on the same form. I have done research on this site and have written the code below, but I am getting a Syntax error, see yellow highlight.
- My checkbox is named: Case is a Readmission from WRCA IP to WRCA IP
- My textbox is named: Date of Current IP Admission (I have defaulted this textbox to not visible).
Here's the code I have written:
Private Sub Case_is_a_Readmission_from_WRCA_IP_to_WRCA_IP_Clic k()
If Case is a Readmission from WRCA IP to WRCA IP =true then
Date of Current IP Admission.visible=true
Else
Date of Current IP Admission.visible=false
[Code] .....
I have several comboboxes in my database from which users select values. However, in most cases, I do want to give them the option to add an item that does not appear while simultaneously updating the underlying table which stores those dropdown values. I have made use of the builtin "allow edit list items" feature of Access 2007 but the form always opens on the first record of the form on which they are to add the new item. Is there a way to specify that it should open in Data Entry view apart from using VBA?
View 4 Replies View RelatedI have a form where the records are propulated by ane xpression, which checks and sums database values.
Sometimes, the control boxes are empty as there is no data to sum for a particular record. Is there a way to get the control box to show the value 0 ?
I've tried default's, etc. but that doesn't seem to work...probably because the expression returns a NULL value.
I know it can be done using IIf but that will complicate the formulas even further.
Is there perhaps a way to do it using code instead ?
i have a combo box containing dates, however it will only display the date at the top of the list, no matter which date is selected.
any help would be gratefully excepted!
cheers
Hey Guy and Ladies,
In one database (Originally an Orders Database created by wizards)
This code to add items to a drop down list in the “orders details subform” works fine.
Private Sub ProductID_DblClick(Cancel As Integer)
On Error GoTo Err_ProductID_DblClick
Dim lngProductID As Long
If IsNull(Me![ProductID]) Then
Me![ProductID].Text = ""
Else
lngProductID = Me![ProductID]
Me![ProductID] = Null
End If
DoCmd.OpenForm "Products", , , , , acDialog, "GotoNew"
Me!ProductID.Requery
If lngProductID <> 0 Then Me![ProductID] = lngProductID
Exit_ProductID_DblClick:
Exit Sub
Err_ProductID_DblClick:
MsgBox Err.Description
Resume Exit_ProductID_DblClick
End Sub
When the same code runs in my new database
Private Sub OptionID_DblClick(Cancel As Integer)
On Error GoTo Err_OptionID_DblClick
Dim lngOptionID As Long
If IsNull(Me![OptionID]) Then
Me![OptionID].Text = ""
Else
lngOptionID = Me![OptionID]
Me![OptionID] = Null
End If
DoCmd.OpenForm "Products", , , , , acDialog, "GotoNew"
Me!OptionID.Requery
If lngOptionID <> 0 Then Me![OptionID] = lngOptionID
Exit_OptionID_DblClick:
Exit Sub
Err_OptionID_DblClick:
MsgBox Err.Description
Resume Exit_OptionID_DblClick
End Sub
I get the error message
“You tried to assign the Null value to a variable that is not a Variant date type”
Any suggestions?
Also if anyone knows a better way to add items to a list box “On the Fly” I would really appreciate it.
It would be nice if you could type in the value and it would automatically add it to the list for future use.
Thanks for all of your help,
Joe
Need some help here....
I am designing a database to keep track of workers for a haunted house. I have a Roster table, a table of all the nights we are open, a table of Spots in the house, and a table to record who works what nights and what spot they are in. This table has a Room combo box and a Spot combo box. The Room combo has a Row Source of SELECT DISTINCT SpotsAll.Room FROM SpotsAll ORDER BY SpotsAll.Room; The Spot combo is then populated with VB code all the Spots that are in that room. That works fine. This is what I'm trying to accomplish: When a Spot is assigned to a Worker for that night, I want that spot to no longer be available in that list FOR THAT PARTICULAR NIGHT. So, lets say Joe Somebody works in Spot 1 (out of 4 lets say) of the Library Room, when we assign another person to the Library room, I don't want Spot 1 in the Spot list.
Can this be done with a query or VB code? If I'm not making sense, please let me know. I can also upload the Database I am creating so that you can play around with it and see what I mean.
(I have attached a word doc. that shows the table relationships.)
Thanks a lot ahead of time!!
ScrmingWhisprs
This is a somewhat complicated question to explain, so please bare with me.
I have a form with a ‘list box.’ The box is populated using a Table/Query Row Source Type method. The table I am grabbing the list from is “Department,” where it contains a list of my company’s departments(ie. Accounting, HR, Payroll, etc.).
Now, the only thing this table does not have is the word “ALL.” I need this word in the “List Box” because I want users to have the option to select ALL.
Is there anything in VBScript code wise or in Row Source that I can do to include this word?
I know I can manually go into the Department table to simply add the word, but this is not the point, because there is more to that(I have different list boxes that are grabbing lists from different tables, AND I have to refresh these tables twice a week). Please help.
Thank you.
Joe
I've got a table with 23 columns. Column 1 is the ID row which has a unique client ID in it. Then we've got a column called 1st_Reason and one that goes with it called 1st_Transfer_Date. This pair repeats for 2 through 10. Each of the Reason columns can have a set value, for example "First Processor".
What I need to do is create a date with months on the Y axis and the 5 different reasons on the X axis. I need to count the number of "First Processor" across all 10 Reason columns for each month. I would need to repeat that for each other reason type, but if I can get one to work I can simply change the reason type.
Here's what I'm using to count May's total:
Code:
=Sum(IIf([Current_Reason]="First Processor" And [Current_Processor_Transfer] Between #4/30/2013#
And #6/1/2013#,1,IIf([1st_Reason]="First Processor" And [1st_Transfer_Date] Between #4/30/2013#
And #6/1/2013#,1,0)))+(IIf([2nd_Reason]="First Processor" And [2nd_Transfer_Date] Between #4/30/2013#
And #6/1/2013#,1,IIf([3rd_Reason]="First Processor" And [3rd_Transfer_Date] Between #4/30/2013#
[Code] .....
I get wildly inconsistent results. On one of the types, it's only counting where it's the 1st_Reason. Some of the others return the same value regardless of which month I have selected.
I am trying to design a form which will provide my users multiple reporting options using the same query.
my query contains the following fields:
Daycode
WeekNumber
PeriodNumber
Line
Machine
Eventcode
TotalTime
Occur
Avg
i want the user to choose in this order :
a time period to run the report.....either Daycode, WeekNumber,PeriodNumber
then select:
a Line,
then select either Totaltime, Occur or Avg (this will require to be sorted Desecnding..
then finally to decide wheter to have all the data remaining, or sorted by machine.
DB is here--------> Click here
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.
my form works fine on the first record of the database but now i have added a 2nd record some of the functionallity form the first record is applied to the second. At the moment in my table for each record i have a status field which speifies whether certain data is visible to the user or not. When i select visible = false on record one this is also appled to record 2. I dont want this and want each record to have there own specific status.
For example at the moment i have:
if me.combobox.value = 1
Me.mytxtbox.visible=true
else
Me.mytxtbox.visible=false
endif
This seems to apply the rule to all records not just the current one i am in. If explaination isnt clear i will gladly expand further
I have a database where new products are entered into it. Over time there are revisions that are made to these products and to capture this, a drop down box has been added that allows the user inputting the product to select the current revision number of this product.I also have another form which shows the product serial numbers, and then a bunch of fields relating to revision numbers (a check box for each), this can be used by field technicians who can locate older models and tick off a revision when they have updated a product to this specification.
What I am hoping to do is that when the user initially enters in a product and selects the revision number of it, the other form will automatically update (the check boxes) up to and including this revision... so for example if a product is being entered and is up to revision 5 - the check boxes under this serial number on the 'revision' form will all be checked automatically (Revision 1, Revision 2, Revision 3, Revision 4, and Revision 5 check boxes).
I have an access project that I am working on and need to be able to select multiple items from a listbox and have the exact selections appear in a textbox on the same form. I have looked around and have not been able to find any code that works.
I have tried:
Me.user2 = Me.slct_auditor.Column(0, 1)
Me.user3 = Me.slct_auditor.Column(0, 2)
Me.user4 = Me.slct_auditor.Column(0, 3)
Me.user5 = Me.slct_auditor.Column(0, 4)
Me.user6 = Me.slct_auditor.Column(0, 5)
Me.user7 = Me.slct_auditor.Column(0, 6)
Me.user8 = Me.slct_auditor.Column(0, 7)
but when skipping the first item in the listbox it is still passed as into the textbox.