I have a drop down list, which on one sub form needs to perform a function to get the data i require. However this drop down is used on several other forms/sub forms in my programe. How do i write an if statement in my sub so it knows to only use the code if the ststement is true?
Below is my code and i tink i need something like this to be added in front of it, but ive tried this and it didnt work!!!
If CurrentProject.AllForms("frm_main").sbf_schedule_allocate.Form.sbf_schedule_engineer .IsLoaded Then
Below code is executed
Else Exit Sub
End If
Code: Sub ampm() If Forms("frm_main").sub_main.Form.sub_property.Form.cmd_ampm.Caption = "PM" Then Forms("frm_main").sub_main.Form.sub_property.Form.cmd_ampm.Caption = "PM" Forms("frm_main").sub_main.Form.sub_property.Form.lbl_period.Capti on = "PM Appointments Available" Forms("frm_main").sub_main.Form.sub_property.Form.LBL_PM.Caption = Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalPM Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalPM.Visi ble = True Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalAM.Visi ble = False Else Forms("frm_main").sub_main.Form.sub_property.Form.cmd_ampm.Caption = "AM" Forms("frm_main").sub_main.Form.sub_property.Form.lbl_period.Capti on = "AM Appointments Available" Forms("frm_main").sub_main.Form.sub_property.Form.lbl_AM.Caption = Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalAM Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalAM.Visi ble = True Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalPM.Visi ble = False End If If Forms("frm_main").sub_main.Form.sub_property.Form.cmd_ampm.Caption = "PM" Then Forms("frm_main").sub_main.Form.sub_property.Form.LBL_PM.Visible = True Forms("frm_main").sub_main.Form.sub_property.Form.lbl_AM.Visible = False Forms("frm_main").sub_main.Form.sub_property.Form.LBL_PM.Caption = Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalPM Else Forms("frm_main").sub_main.Form.sub_property.Form.cmd_ampm.Caption = "AM" Forms("frm_main").sub_main.Form.sub_property.Form.lbl_AM.Visible = True Forms("frm_main").sub_main.Form.sub_property.Form.LBL_PM.Visible = False Forms("frm_main").sub_main.Form.sub_property.Form.lbl_AM.Caption = Forms("frm_main").sub_main.Form.sub_property.Form.txt_totalAM End If End Sub
Using Access's User and Group Accounts or Using a Login Form to access database?
I've been researching on how to make a database secure. How to create User and Group Accounts on access, I see the step by step instructions and tried it out myself.
I also saw some sites where they give an example of a Login Form and how to create one.
My question is do you need to create both. First create the users and groups to permit or deny access to certain forms and then have a login form?
But would that mean that they'd have to login twice? Once when the database opens because it activates the db security that was created and then login again in the login form that was created?
Also when the user logins in and clicks on the cmd button on the form which opens up another from, frmWorkLog, I have an Employee field. This field I want it to have the user's name entered automatically and "locked". So that info, employee name, is extracted from the user's login. So then the user can only see his or her records only and no one elses.
How would I go about creating that. Hope I made my explanation clear.
I have a simple access search form , that's based on a query that fill parameters from the form textboxes, when the access form loads its keeps prompting for parameters value which looks ugly .. I want to open the form, displaying all the records in the table and filter when i click search ..
I have a data entry entry form, that i want to generate success message after successful insert in database. I have done it in the button event if no error happens, still if i left all fields blank and clicked save, it displays the message ..
I need to change that to display please fill the textboxes then click save , and display success message when the row is actually inserted ..
I have made a form on access which will be used by other employees within the company, however they have never used access before and they are wanting to access only just the form as I feel with Access and all the tools in the background will confuse them, plus I don't want them editing the data base its self.
Is there a way to only bring up the form, unless I obviously need to edit the date base.
I've done some research on Google and it seems I need to use:
SW_SHOWMINNOACTIVE
However I can not seem to find how I would use this or where?
and also if i did find a way to only bring up the form, how would I be able to switch it from that veiw to the veiw I edit in?
I have a database (.mdb file) which includes a table, forms and VB code. I intend on putting it onto a CD and then opening the form on another computer which may not have Access. Is this possible? Can I convert the file or can I attach some type of reader to the disk? I have seen some software for download on the internet which allows you to open the tables however the Form is the most important thing in this case (but I take it whatever I use, it will need to be able to view the VB, subforms and tables as well since the Form depends on them?).
...also can I install an auto-run to the file for when the disk is inserted? (this is not a major issue though).
I am very new at Microsoft Access. I have two forms, A and B, that are filled out by two different users. Form A gets filled out first than form B gets filled out. Each has a name box as well as a birthdate box and a few other similar text fields. However, each form also has a few distinctive fields. I was wondering how I could input the common information in Form A to Form B so the user of Form B does not have to spend time retyping the name and birthdates again. In other words, I want to synchronize the similar records between the two forms. I would like the values to appear in a table as well. I would greatly appreciate it if someone could help me with the visual basic code. Thank You.
I am using Access 2010 - Version 14.0.61.29.5000 (32-bit)
I am building a custom Export Wizard to export data to Excel using the Report Wizard for the basic ideas.
All I am trying to do is have a [Back] button on a form to open another form and close the current form.
Private Sub cmdBack_Click() DoCmd.OpenForm "frm_ExportWizardPage2", , , , , , Nz(Me.OpenArgs) DoCmd.Close acForm, "frm_ExportWizardPage3" End Sub
The new form is opening but then the current form is not closing. All forms are the same size, shape and positioned centrally although this should not make any difference.
Could this be anything to do with which form has the focus when I open the new form?
I have a Lost/Found property database which we use to keep record of the lost/found property and it is working fine.
As per our organization's policy, we keep the item(s) for up to three months in which if it gets restored to the owner then fair enough otherwise after three months the item(s) can be claimed by the "Finder". But for this very purpose we issue the Finder with a "Claim Receipt" which he/she should bring in when claiming for the item(s) after three months period. Therefore, It's just the right time to upgrade the database to a more professional level.
The database has one table and two forms.
One form (LostFoundForm) is visible to the user in which they enter data, this form has two sections; Item(s) & Finder's details and the second section is about Restoring details.
However the second form (ClaimReceiptForm) is hidden to the users (for manual data entry) and has only one section which is exactly the same as the first form's first section, i.e., Item(s) & Finder's details. This second form takes the data automatically from the first form because the table behind them is same and fields are same (please see attachment). Up to here it's all working fine.
I would like to introduce a Checkbox or a CommandButton in the LostFoundForm which when we click should pull up a msgbox asking "Do you want to print the receipt for this item(s)?" with a Yes/No option. On clicking "No" it should, obviously, settle down but on clicking "Yes" it should print the "corresponding record" from the ClaimReceiptForm.
I have created a MS access form having a combobox,button.There I have coded like : When the user click on button,a report will be generated. I need to show the access form in the excel form.I have searched and got code,which only allows me to open the ms access not the form.
I am trying to display only my form on startup. Tools-Startup allows you to eliminate"Database window" default menu and toolbar but I can't eliminate "Microsoft Access" window.
I don't know if there are other settings that I am not aware of or there has to be code built.
I have a form (called DeliverableDescription ) that has the following buttons: close, and save the main from has a sub form (called DeliverableDescriptionsubform) that is viewed as a datasheet also I have a table called DeliverableDescription that has three columns (outline number, name, and group number)
the DeliverableDescriptionsubformshows data from DeliverableDescription (only the outline number and name) this DeliverableDescriptionsubform is used to update the DeliverableDescription table (through copy and paste from another source)
what I need to do is populate the group number column when the DeliverableDescriptionsubform is updated the group number is just the first part of the outline number (i.e. if the outline number is 20.45.35.1.4.9 then the group number is 20)
I want to create a command in the save button that takes the string value of each item in outline number column and do some simple string manipulation to it then populate the group number
my approach is to have a select query that gives me all the outline number then through a loop iterate through each one, performing the string manipulation and update to the table.
my question is how to access elements in a sub form, since the save button is in the main DeliverableDescription form also is there a better way to do this?
thanks for any help you might be able to offer.
Code:Dim ws As WorkspaceDim db As DatabaseDim rs As RecordsetDim OutlineNum As StringDim queryResult As StringDim returnResult As StringDim SearchChar As StringDim Pos1 As IntegerDim TotalLen As Integer OutlineNum = "SELECT DeliverableDescription.OutlineNumber " & _ "FROM DeliverableDescription " Set ws = DBEngine.Workspaces(0) Set db = ws.OpenDatabase("N:statusReport_Test.mdb") Set rs = db.OpenRecordset(OutlineNum) Do While Not rs.EOF queryResult = rs.Fields(0) TotalLen = Len(queryResult) SearchChar = "." Pos1 = InStr(queryResult, SearchChar) returnResult = Left(queryResult, Pos1 - 1) DoCmd.RunSQL ("Update DeliverableDescription SET DeliverableDescription.TeamLeadNumber = returnResult " & _ "WHERE DeliverableDescription.OutlineNumber = OutlineNum ;") queryResult = "" SearchChar = "" Pos1 = 0 rs.MoveNext If rs.EOF Then Exit Do End If Loop DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
I was wondering if anyone might be able to help me with this question. I have a form that is used for access authentication. In the form, there is a textbox for password and two buttons i.e. ok and cancel. My question is this. As soon as the user enters a password and hit enter key, i want the form to disappear and let the user access to the database.
What's happening at the moment is that when the user hit the enter key after entering his password, it goes to the OK button but doesn't let you in until you have to hit another enter key again.
I hope i explains it well otherwise let me know.
Thank you in advance and look forward to hearing from you.
Hi First of all i have found a lot of helpful things while browsing through the forums, so thank you very much everyone and this forced me to register here.
I have got a question to ask:
Can i get some access form styles from a website? I have tried searching but could not find anything, however i have seen in sample databases that there are different form styles then to those originally available in access xp.
Dear All, i have a very simple database with only one table.
The table has three values [Start], [end] and [Total].
The [start] & [end] fileds are numerical.
I am trying to get it so that i can enter the values onto a form, the two values in [start] and [end] need to be added together to give the [total] value.
I can get it to do it on the form but i don't know how i can get the record in the table to be updated.
Does anyone know if this can be done and if so could you advise me where i'm going wrong.
I need to create a frontend for my database that enables average users to edit the tables. So far, I got as far as creating a tabbed form for this function, but now I would like to know if it is possible to "externalize" this form, so that the users wouldn't need to start Access to use it.
I have being creating some forms with Access 00/02 and I have come across one for me particular strange and somehow annoying item “Colours”. My question here now is, how would it be possible to use instead of the say ”Back Color: 65280 numbering” a colour scheme similar use in web design i.e. hexadecimal or where at least could I find a list of colour numbering??? as used in Access.
Obviously "SupplierOrderCreateNewSubForm" is a sub forms on "SupplierOrderCreateNew".
There is a text box on "SuppierOrderCreateNew" called "supplierOrderNumber".
There is a text box on "SuppierOrderCreateNewSubForm" called "productNumber".
I then have a second form: "ProductSuppliers". I want to return a value from "ProductSuppliers" when a button is clicked on. When the button is clicked on, I want to put the value into "productNumber". However, I dont know how to refer to the text box.
I can put the value into "supplierOrderNumber" but not into "productNumber".
I am trying to import a form from another access db. The access db I'm attempting to import into is Access2000, from an Access2003 db. I've also tried to export from the Access2003 db. Neither works but I don't get an error message. Any ideas?
I would like to juice up a form with a little animation (logo). I tried embedding a Flash movie, but it will only run in a seperate window, and that's clearly not what I want. Placing an animated GIF in a form doesn't move a bit. Any ideas?
I've got 2 sub forms that I intend on using via a toggle button from my primary form to access them. Is there anyone that can give me a heads up on creating vb code that when OnOpen it will automatically advance to a new record for data entry? I want the form to keep anyone from accidentally changing existing info in that regard. I'm still really new with VB.
Hi all Its my first time on this forum so please be gentle with me ! I have a list of numbers stored in a field (wieght). I have another field that is the product field. I also have a list of letters (A-D) Now, the weight can be 1kg (through to 20kg) A-D hence four different values in my product field. I need to have a form that the user can choose a letter then enter the weight to show the correct product. I can get a dllookup function to work fine for the fields involved but i need a control to filter the different letter combinations Anybody point me in the right direction
