Okay I have 3 forms. I have one form which is called frmEndOfTrial on this form there is a combo box which has two values--> Accepted and Return for credit.
I have two other forms called frmAccept and frmRFC. I have dragged those two forms onto the frmEndofTrial form and set there visibility to No.
What I want to happen is that when the user clicks on the 1st or 2nd option that corresponding form opens below the combo box?
I've tried a few things here but can't get it to work. I'm pretty limited in knowledge on access. Right now on hte combo box events I have this code for the After Update event
me.sfrmRFC.Visible = True
me.sfrmAccept.Visible = False
I know this is not what I want and not finished cause if I click on either accept or RFC it just brings up the sfrmRFC. How can I do this???
I have a form with subforms, where the main form's source is a table called tblCharts. Within this table there is a field called ID that is autonumbered.
So I created a combo box that's row source is a query that selects the ID field from table charts and two other descriptive fields to make navigation easier. Limit List is set to yes.
The problem comes up with code that I've used multiple times, but not with an autonumber. The code typicallly looks like this when I'm searching on a text field.
Code: Sub cboPatientSelection_AfterUpdate () Dim rs As DAO.Recordset If Not IsNull(Me.cboPatientSelection) Then If Me.Dirty Then Me.Dirty = False
[Code] ....
This worked at first but then 3070 runtime error came up, the form started messing up. So I made this code
Code: Sub cboPatientSelection_AfterUpdate () Dim rs As DAO.Recordset If Not IsNull(Me.cboPatientSelection) Then If Me.Dirty Then Me.Dirty = False
[code].....
This code worked at first, so I decided to make a copy of my form called Copy Of frmCharts. After this the code stopped working on the initial frmCharts but now works on the copy.
I also received other errors besides 2070. I know what error 3070 is but I can't figure out why it's not working on this form. I closed and opened the form a few times and it happened to start working. Very frustrating when I'm trying to make the system reliable for others to use
The code only seems to do this when I enter design view then switch back to form view.
I'd like to know how to programatically bring a form on top of another one
I have two forms: Menu and Notice
in the onOpen event of the form Menu, I open the form Notice
problem is that even if Notice is the active form, it still hides under the Menu form...that's just weird...
Could it have something to do with the startup option in Access in which I tell to open Menu first, it looks like the startup event comes after the onOpen event.
I have one "Project" form with subform that displays "Contractor" details. The Contractors are stored in a table and they are associated to a table of projects (many to many relationship) through a link table. When I am in the project form and have the contractor sub form tab "activated" I would like to go to the contractor form (press a button), select a contractor and link the contractor back to the project. Question: What is the best way to do this? I have tried creating a macro but get stuck as I need to "pause" it whilst I select the Contractor... As you can see I am no whizz! What is the simplest way to do this?
I have added a scroll list to my access form and although I can see the item I need to pick in the drop down list when I manually start typing it, the scroll box doesn't bring the value up and states that the value I have selected is not in the list (when it clearly is !!)
I have a form and table called pcinfo-vendor that the customer enters some date that they need. They also need to pull up some vendor information from a table called vendorinfo Vendor name, Address, City, State, Phone #, FAX # and Email. How can I bring up the data from the vendorinfo table on to my form called pcinfo-vendor? So that the customer does not have to type in - Vendor name, Address, City, State, Phone #, FAX # and Email each time for every vendor.
I have a form with various text, date and combo controls. There is a button at the button that runs a macro (Close NB) at the bottom. What I'm trying to do is bring up a msgbox if certain fields are blank and not run the macro. I only want the macro to run if all the fields specified have data in them.
The fields are : cmb_cliname cmb_disease cmb_projectType cmb_ProposalStatus
The on click code is: If (Me.cmb_cliname Is Null) Then MsgBox "Please fill in the relevant details", ElseIf (Me.cmb_Disease Is Null) Then MsgBox "Please fill in the relevant details"
I've looked for how to do but everywhere people asks how to bring a form in the front of all forms.I have a form emergent and modal. The program hides the access enviroment.But, when the form is loaded, it always appears under the window that I have active (whatever the window is, an excel sheet, internet explorer, etc).Is there any vba command to bring the form (or maybe the access application) to the front as the first visible window?
I`m trying to put 2 identical tables in terms of structure and layout with some identical values next to each other however I don't have unique identifier. I was thinking to import them and let access to create Id field and match them together but i wasn't successful because for some reason access changed the order of some rows. Good news is that when I import these text files into excel Im able to put them next to each other in order. How this could be achieved in Access?
I am trying to figure out how to make my database check to see if the primary key value is a duplicate of anything ive entered previously and if yes, for my database to bring up that record instead of adding a new record.
I know how to do bring up records using a separate combobox (find) but I cant seem to do it using the primary key field itself.
I have searched the forum and have found a lot of information however I am not sure just exactly what I am looking for.
Here is my situation.
It is a spilt DB.
I have a database with a form and a subform. The Primary Key in the form is unique to company A ie ID=CompanyA-1, CompanyA-2, and so on. There is a one to many relationship to the subform.
I have three of these databases in use, all identical execpt the Primary Keys. one is CompanyA, the others are CompanyB and CompanyC.
At the end of the month I want all companies, A,B,&C to send me their Backends so I can bring them all together into one database. The master database I want to bring all three backends into has the same Front End as the other three databases.
My question is what is the best way to bring all of the data together in one database so I can use the common front end to view it.
I am assuming that since the PK for each database is different they should all cometogether without much of a problem? If I can figure out how to merge them.
I created a database for a survey. There are a lot of number fields and a few yes/no fields. I did a query to give an average for the number fields and a sum of the yes for the yes/no fields. I get the right number for the yes/no fields, but the number is negative. What do I need to do so that the number is positive?
I have rectangle object positioned 'behind' several fields on a report....
I wish to be able to hide these fields depending upon access rights....
In code am I able to bring the rectangle to the front and thus hide the fields in question... to save writing a routine to hide each control individually...?
recently posted a thread about a union query. I have got over that hurdle now but face a new problem which is:
When I have created a right join to bring back data from a table, if there is no data it will leave the fields blank. Is there any way I could bring back the row data of the same table.??
In the past I've used command buttons with both VBA & Macros to bring up a prompt to save or discard changes to the current record then close the current form.For some reason, on just one single form that I just created, none of the techniques seem to work. It will close the form but will automatically save changes without bringing up a prompt. I've tried creating buttons from scratch, trying out both Macros & VBA, and I've tried copying/pasting buttons from other forms--of course making the appropriate changes.
I have written the following code to open the Outlook 2013 'Select Names Dialog' with a command button called 'btnTo' from an Access 2010 form, this code works fine to display the dialogue box but it is usually hidden and the user has to 'click' the icon on the task bar to show the dialogue box. I know that there is an API that will bring the dialogue box to the front but how to code the API to do this.
Code: Private Sub btnTo_Click() On Error GoTo Err_btnTo_Click Dim olkApp As Outlook.Application Dim olkSes As Outlook.NameSpace Dim olkSND As Outlook.SelectNamesDialog
I've written a function which opens the Outlook GAL dialog, allows users to select recipients and passes back a 2-D array (recipients and type i.e. To, CC or BCC).Here is the code :
Code: Public Function GetContactsFromOutlookGAL() As Variant Dim appOutlook As Object ' Outlook Application Dim objNameSpace As Object ' Outlook NameSpace Dim objSelectNamesDialog As Object ' Outlook Select Names Dialog
[code]...
The only problem I have is that when I 'display' the SelectNamesDialog, it doesn't make it the active window and bring it to the front - it just opens the dialog in Outlook and you have to navigate to the main Outlook window to find it.I'd like for the dialog to 'popup' - ideally, without the main Outlook window dragging along behind
I believe it's possible (judging from this article) to achieve this using API's - specifically, a combination of FindWindow (to retrieve the window handle) and ShowWindowLong (to set it to a topmost window in front of all other windows).
I am trying to use a combobox called Manufacturer to select which table the combobox called Model gets it's rowsource from using the code below.
Code:
Private Sub Manufacturer_AfterUpdate() If (Me.Manufacturer.Value = "Siemens") Then Me.Model.RowSourceType = "Table/Query" Me.Model.Recordset = "SeimensTable" Me.Model.RowSource = "SELECT Model FROM SeimensTable" Else If (Me.Manufacturer.Value = "Samsung") Then Me.Model.RowSourceType = "Table/Query" Me.Model.Recordset = "SamsungTable" Me.Model.RowSource = "SELECT Model FROM SamsungTable" End If End If End Sub
But when I run the form and select Manufacturer. Combobox Model remains empty. tell me what I'm doing wrong?
How would I modify multiple comboboxes in subforms at the same time. For example.. In main form ComboboxA user selects 1992, Combobox1 in subform1 is also changed to 1992, as well as Combobox2 in subform 2.
