What I want to do: On activation of a command button on 'Form A', I would like an existing combo box on Form A to be enabled (e.g. allow a user to select values in combo box), and once the user has selected the value in the combo box, copy that value to field in a table B. Is this possible? How can it be done?
The values being displayed in the combo box are a result of a query on an existing table. Knowing this, is there a better way to do the above?
Hi. I have sort of found an answer to my problem by this thread (Thread (http://www.access-programmers.co.uk/forums/showthread.php?t=20358&highlight=show+field+ticked)) but it doesn't seem to be working.
I have (amongst others) a tickbox and a combo.
Basically, I would like it so if the tickbox is ticked, the combo is enabled, and no tickbox and it is disabled.
I have been putting this code:-
If Me.Helpdesk_Call = -1 Then Me.Combo23.Enabled = False Else Me.Combo23.Enabled = True End If
on the forms onCurrent event, and then changing the onUpdate event of the combo, but is doesn't seem to work. I have tried numerous amounts of variations, but nothing seems to be working.
im trying to enable/disable checkboxes based on a combobox selection for instance,
i make the selection in a combo box called terms and conditions. i want it then to only enable the business,domestic and summary check boxes for that type, with the onther check boxes staying disabled. is there a way this can be done through code like the statement "only enable if this letter type selection has been selected"
I've created users and groups in my access database and assigned the permissions. My security wizard is not working. How do I enable the secuirty-- force the users to logon with a username and password?
Hello Guys, I need to know how to enable toolbars and edit a text in a report... the database is locked by previous employee and I can't get to design view so I can change a text... There isn't any tool bar up there.. just EXIT button..
Here is my problem: When a certain yes/no box is true (checked) other fields on the form are not enabled. That works just find when I am on the record that I click the yes/no field. When I go to another record and then go back to the previous record the fields that should be disabled due to a certain yes/no box being true are now enabled and not disabled. Below is my code. Can anyone tell me what I am doing wrong?
Hello everyone. Over the summer i made a database. i think i may have done some locking on it so that i couldnt change it (and only use it), but now i would like to correct some errors. First off, i cant get the database toolbar to show up, and i cant use right-clicking. How do i enable right clicking and get this database to work so i can edit it.
On searching the forum, I found the following post for enabling/disabling BypassKey. I did as instructed but on clicking the label, it gives 'syntax error with 'On Error Goto' in red color and highlighted.
Hello af1112 welcome to the Forum...
I use this code that ghudson supplied at the beginning of this post.
First of all create a copy of your db (Just incase.. )
Now......
Create a label on a form somewhere and make it invisible to other users (I have mine hidden in my main Switchboard)
The idea is that by clicking on the label you can activate/de activate the code without anyone else knowing about what you are doing..
Name the label "bDisableBypassKey" & hide it somewhere in the corner of your screen or something.
Copy & Paste the code inbetween the bold text to the onclick event of the label you have just created
Private Sub bDisableBypassKey_Click()
On Error GoTo Err_bDisableBypassKey_Click 'This ensures the user is the programmer needing to disable the Bypass Key Dim strInput As String Dim strMsg As String Beep strMsg = "Do you want to enable the Bypass Key?" & vbCrLf & vbLf & "Please key the programmer's password to enable the Bypass Key." strInput = InputBox(Prompt:=strMsg, Title:="Disable Bypass Key Password") If strInput = "MY PASSWORD" Then 'Change password to your own ChangeProperty "AllowBypassKey", DB_BOOLEAN, True
Beep MsgBox "The Bypass Key has been enabled." & vbCrLf & vbLf & "The Shift key will allow the users to bypass the startup options the next time the database is opened.", vbInformation, "Set Startup Properties" Else Beep ChangeProperty "AllowBypassKey", DB_BOOLEAN, False
MsgBox "Incorrect ''AllowBypassKey'' Password!" & vbCrLf & vbLf & "The Bypass Key was disabled." & vbCrLf & vbLf & "The Shift key will NOT allow the users to bypass the startup options the next time the database is opened.", vbCritical, "Invalid Password" Exit Sub End If Exit_bDisableBypassKey_Click: Exit Sub Err_bDisableBypassKey_Click: MsgBox "bDisableBypassKey_Click", Err.Number, Err.Description Resume Exit_bDisableBypassKey_Click
End Sub
Now paste this code in the Double click event of the same label
Private Sub bDisableBypassKey_DblClick(Cancel As Integer) Private Sub Disable_Click() Option Compare Database
Option Explicit
Function ChangeProperty(strPropName As String, varPropType As Variant, varPropValue As Variant) As Integer
Dim dbs As Object, prp As Variant Const conPropNotFoundError = 3270
Set dbs = CurrentDb On Error GoTo Change_Err dbs.Properties(strPropName) = varPropValue ChangeProperty = True
Change_Bye: Exit Function
Change_Err: If Err = conPropNotFoundError Then ' Property not found. Set prp = dbs.CreateProperty(strPropName, _ varPropType, varPropValue) dbs.Properties.Append prp Resume Next Else ' Unknown error. ChangeProperty = False Resume Change_Bye End If
End Function
To Test click on your label to activate the password prompt and type in the wrong password (that will now disable the bypass key) and you will not be able to open the db by holding down the Shift button
to disable enter the correct password and you will be able to use the Shift button
Hi there I am new to Access and I am currently modifying an existing DB. Currently this DB has a main table which holds a bunch of Patient info such as:
Name Age AssignedStaff Condition etc....
The assigned staff field is populated from another table (Staff), which holds all the staff members working at the institution. However a couple of these individuals have left and they no longer want their name to show up on the form when inserting a new record. However we do want there name to still be in the DB for historical reporting purposes......My intital thought was to create another field in the Staff table that would hold either a "Active" or "Inactive" entry. Then just have a simple If statement to see if the staff member is active or inactive. Does anyone see any problems with this solution or propose a more efficient method.
I am creating a data entry form with combo boxes related to two different tables: TblEducationID EducationID - Auto# PK Education - Text TblMediaFill MediaFillID - auto# PK Incubation Time- text Incubation Temp - text
In my form, I have a combo box that the user selects the Education Type (Media Fill Test; Aseptic Technique Observation, Watch Video, etc....)
I want the incubation time and temp text boxes to be disabled unless Media Fill Test (ID#4) is selected on the first combo box. (I get a Procedure Declaration does not match error.)
Private Sub EducationID_AfterUpdate() If EducationID = 4 Then IncubationTime.Enabled = True IncubationTemp.Enabled = True Else IncubationTime.Enabled = False IncubationTemp.Enabled = False End If
I have code set up to disable a textbox by clicking on it (Yes, that right, I want the textbox disabled as soon as it is clicked on) with Me.Txt.enabled = false during the _onClick Event. However, the with which I am working has 500 textboxes. Is there a way to call a function or something that would disable just the textbox that is clicked on?
Got a small problem. I got a big Access-form (big of size) but a small computerscreen before me. I am very much used to scroll up and down with my mousewheel.
However, when I open my file and the opening-form pops up I cannot scroll up-and-down the form using my mousewheel.
Is there a VBA-code or whatsoever which can enable the mousewheel???
I tried to find the answer in earlier discussions, but I found only discussions where the topic was about disabling the mousewheel. I want to ENable it.
I've got a text box that is disabled, and want it to become enabled when the user clicks the required check box.
I've got the following code, and can't see anything wrong with it, but for some reason it doesn't work. No error message appears, but the text box stays disabled regardless of whether I check the check box or not.
Private Sub Successful_Click()
If chkSuccessful = True Then txtDateAppointed.Enabled = True Else txtDateAppointed.Enabled = False
Private Sub A300_Completed_AfterUpdate() If A300_Completed = True Then A300_Date.Enabled = False User1.Enabled = False Else A300_Date.Enabled = True User1.Enabled = True End If End Sub
for some reason when creating a new record the above disabled/enabled fields retain the same property of the last records check? The form in a single (not a continuous)
Hello. I have a form with a million little buttons on it (don't get me started, I didn't design it! - heh)...
Depending upon which user is running the mdb, I would like all but 16 (of the 80 or so) objects/controls disabled/enabled. I would like to autodisable all the controls, then enable the subset (or all of them) depending who the current user is.
SO in short, other than individually disabling/enabling the many items, is there a magic command for vba, similar to enable *.* for controls [silly e.g., but I hope you get my point...]
Hi guys, I have a huge problem with a table I'm currently making and I was hoping you could help.
I have created a field in one of my tables using a Combobox lookup that only allows users to enter one of two options. What I want to do is restrict the other fields that a user can enter data into based on the their selection in the lookup field.
i.e if they select the first option then they can see and enter data into a few additional fields (but not others). Likewise if they select the second option they see/dont see other fields.
I want to disable a tab control page when a form is open, and enable some of the fields if a check box is checked, and some others if another check box is enabled
Hi guys, I have a huge problem with a table I'm currently making and I was hoping you could help.
I have created a field in one of my tables using a Combobox lookup that only allows users to enter one of two options. What I want to do is restrict the other fields that a user can enter data into based on the their selection in the lookup field.
i.e if they select the first option then they can see and enter data into a few additional fields (but not others). Likewise if they select the second option they see/dont see other fields.
Hi. Lets say i have a (Yes/No) combo box and a text box. I have it so if my combo box says Yes the text box must become enabled so i can type in it. The problem comes in when I goto a new record, the combo box is still enabled. I have tried putting the text box to disabled in form_load, but then when I go back to view other records the text box is disabled and the combo box is already set to Yes.
How do i overcome both these problems at the same time ??
I accidently unchecked the "allow full menus" option in Tools - Startup. When I did that, the menu bar at the top of my database no longer displayed the "Tools" option.
Does anyone know how I can restore the full menus option?
I am new to access and can do nothing with my database until I get my menus back.
I have a subform in datasheet view. In the main form I have various combo boxes to filter the data in the subform. I want to be able to check off the checkbox in the subform then filter all records that are checked, however, I am not able to check any of the checkboxes when I'm in my main form.
Example: Sales Region, Order Date, are two fields
I can go in and select "north", "5/20/2013" then filter and let's say I get 55 records
So within the north region on 5/20/2013 I only want to select 5 of the 55 records by checking them off in the subform then in the main form I would drop down the unbound combo box to 'yes' and it would give me all records in the 'north' region with an order date of '5/20/2013' that I checked which should be 5 in this case. But, it won't let me check the box in the subform.
I have a form where I have buttons that apply filter to a certain column.How do I enable multiple filters where I can click more than 1 filter button and it keeps the filters?
First filter button:
Private Sub Command1_Click() DoCmd.ApplyFilter "Filter1", "[MyQuery]![Checkbox1]=Yes", "" End Sub
Second filter button:
Private Sub Command2_Click() DoCmd.ApplyFilter "Filter2", "[MyQuery]![Checkbox2]=Yes", "" End Sub
Third filter button:
Private Sub Command3_Click() DoCmd.ApplyFilter "Filter3", "[MyQuery]![Checkbox3]=Yes", "" End Sub
It works well, but one by one. How can each next filter be added to previous filters by clicking filter button on a form?
