I have an inventory transaction file that has quantity on hand as a calculated field. I am trying to add this unbound field to a report using a query but I can't figure out how to add my quantity on hand field to the query since it is a calculated field and not a bound control.
I'm preparing a query as the control source for an unbound listbox. The following code gives the desired results:
Code: SELECT DISTINCT tblCameras.CameraNum, QrySbfShotList.CamerasFK FROM QrySbfShotList INNER JOIN tblCameras ON QrySbfShotList.CamerasFK = tblCameras.CamerasID WHERE (((QrySbfShotList.shootsFK)=[my].[control])) ORDER BY QrySbfShotList.CamerasFK
(My.control will be a control on the form. For the time being, I let the query prompt me for a value.)
It produces two columns like so:
CameraNum Camera ID 1 2 2 3 3 4 4 5 5 6 6 7 8 9 11 12
CameraNum is text; CameraID is numeric.
Now, I'm trying to use a trick I read about that should add a single textual entry to the top of the list like so:
Code: SELECT DISTINCT tblCameras.CameraNum, QrySbfShotList.CamerasFK FROM QrySbfShotList INNER JOIN tblCameras ON QrySbfShotList.CamerasFK = tblCameras.CamerasID WHERE (((QrySbfShotList.shootsFK)=[my].[control])) ORDER BY QrySbfShotList.CamerasFK
union
SELECT "(ALL)", "Dummy" FROM QrySbfShotList INNER JOIN tblCameras ON QrySbfShotList.CamerasFK = tblCameras.CamerasID WHERE (((QrySbfShotList.shootsFK)=[my].[control]));
This produces
CameraNum Camera ID ALL Dummy 1 2 11 12 2 3 3 4 4 5 5 6 6 7 8 9
The second (numeric) column is now out of order. This is reproducible for other values of my.control. If there are double digit entries they get inserted at the third row.
Why? What am I not understanding about how UNION works?
(BTW, I know I could put the "ALL" entry into tblCameras, thereby avoiding the need for a union, but I'd still like to know why the unexpected result.)
I have a form that uses a query as its control source. The problem I have is that on this form I have an unbound textbox that I need to show the result of another query in. I thought I could do this by using =[Query]![QueryName]![Field name] in its control source, but this isn't working.
Is it possible to have an unbound image control on a tabular form displaying a different image for each record ?
Actually i have tried putting some code on the onCurrent event, but it is displaying the same image in all records, depending on which record is current.
This is the code which i tried using:
Private Sub Form_Current() On Error GoTo Err_Form_Current If Not IsNull(Me.txtCountry) And Not IsNull(Me.txtCatalogueNumber) Then Me.Stamp.Picture = Environ("userprofile") & "My DocumentsDatabasesPhilatelyStamps" & Me.txtCountry & Me.txtCatalogueNumber & ".jpg" ElseIf IsNull(Me.txtCountry) Or IsNull(Me.txtCatalogueNumber) Then Me.Stamp.Picture = Environ("userprofile") & "My DocumentsDatabasesPhilatelyStampsNotAvailable. jpg" End If Exit_Err_Form_Current: Exit Sub Err_Form_Current: If Err.Number = 2220 Then Me.Stamp.Picture = Environ("userprofile") & "My DocumentsDatabasesPhilatelyStampsNotAvailable. jpg" Else MsgBox Err.Description, vbExclamation, "Error #" & Err.Number End If End Sub
Actually, the above code works fine for Single Form, but not on tabular form.
I have this on two slightly different reports, where only one line of the report is different. One report works fine, no problems. All the data is there. But on the second report I get the dreaded #Name? error.
Please see the attached images (screen shots from my db).
I'll start by explaining the function of this form. Invoices are raised through a different area of the system - they then appear in the outstanding invoice list in my payment processing screen while awaiting payment. When a payment is received the user creates a payment using the controls at the top of the form. When created - payments will appear in a list box at the bottom of the screen. I then want the user to be able to highlight a payment from the list and type the amount to allocate against each line in the outstanding invoices subform. Then (once happy with the allocation) press the "Allocate" button which will cycle through the allocations the user has made inserting rows into my Transaction table - allocating the payment against multiple invoices.
The fields displayed in the outstanding invoices subform are selected in a query which calculates the amount still outstanding. In trying to illustrate my aim I've added an unbound text box to the subform (the column Allocate). What I'd like to be able to do is type a different amount against each outstanding invoice. I understand this is not the way that unbound controls work in continuous forms - i.e. that they are multiple instances of the same control hence when I type 100 against the first item in the list it appears against every item in the list. I can't use a bound control because the query is not updateable - and in any case, the entry won’t exist in the transaction table until it has been inserted anyway.
I'm pretty competent with Access and VBA but haven't really explored recordsets - I'm usually able to achieve what I want by binding my forms to stored queries. This, however, is a bit more of a complex problem than I'm used to dealing with.
So, to the point then. I guess my first question is - is it possible to achieve this? I'm sure it must be. If so please can someone try to shed some light?
Secondly, I have an idea but have absolutely no idea of how to implement it. I seems to me what I would need to do is build a temporary recordset for the form and add a field to it i.e. the "Allocate" field I've been talking about. The user would then be able to manipulate this recordset because the form wouldn't be directly accessing a query. Nor would there be any unbound controls on the form. Once the user had typed in all of the allocation figures they are happy with they would be stored in my temp recordset. They could then hit the "Allocate" button which would cycle through the recordset inserting rows into my Transaction table (as long as various validation rules were passed).
Does this sound possible? If so can anyone give me any help or point me in the direction of any material they know of that might be of any help?
Thanks in advance for your help.
To give a flavour of how I originally built this form I've attached another image - PaymentProcessingOld.gif. It's a similar kind of setup. Payments are created at the top of the screen and appear in the list box bottom left. The outstanding invoice subform serves only as a point of reference. The user actually allocates payments by selecting the item from a combo box and typing the amount. This builds the transaction I've talked about above. It's quite straight forward when there are only a few payments and allocations, but in practice payments are usually large and split across up to 100 different invoice lines. That makes it a very tedious task.
I have a Form - "Cases". The button to open the report is on that form as are the values I want in the report.
I want to pull the value of Case Name and Case Number from the current form view and put them together in the single field on my report.
I can "almost" do it. Then VBA gives me a warning - it says that you can't assign a value to the control on my report.
Can anyone give me any ideas?
by the way: I chose to make this an unbound report because I'm using SQL server as my back-end and my Access is an .adp file. SQL (so I was told by the programmers at work) can't pull in variable criteria from a form like Access Queries can. So this all has to be put in VBA.
I have a report that starts with an unbound form [Form1] which I need for the parameter inputs. Date1, Date2 and BillingMonth, all three are unbound controls. Date1 and Date2 are the criteria for the dates of billing and they work fine, that is, the query looks them up and the query runs fine. But I want to use the unbound control of BillingMonth to populate an unbound control in the report heading.
The control source is set as =[Forms]![Form1].[BillingMonth]; it works fine if the underlying [Form1] is still open. There is a command button on [Form1] that opens the report and then closes [Form1] since it is a pop-up form that is only used to get the criteria for the underling query; I don't want it to remain open when I run the report. However, the [BillingMonth] does not appear on the report heading. Just #Name?, which I assume means that since [Form1] is no longer open, it can't find the control [BillingMonth].
So, how can I get the [BillingMonth] to appear on the report heading?
I have a user form that has many unbound controls that are used as calculated controls that lead up to an unbound control that is the grand total of all the data entered. I would like for the unbound grand total control to update the grand total field in the table where I would like to store the data..is there a way I can bind an unbound control to a field in a table?
I have entered an unbound text control into my footer, and typed in some text, and now when I go to Preview my report it's asking for a Parameter Value? There is no parameter, as it's just a return address typed in there. That's crazy!!!
On a Tab Control inside a from, I've created an Unbound Object Frame, referring to an MS Excel Work Sheet. The goal here is to link that Unbound Object Frame residing on the Tab Control and save the form/link.
Now, when I execute the code, the Object Frame is linked and updated, but when I close the form, the link inside the Object Frame is not saved! However, when I do the exact same thing without placing the Object Frame on one of the pages of the tab, so as regular control inside the form, all works fine.
The code is as follows (performed when I click the button);"OLETest" refers to the UnBound Object Frame placed inside the first page of a Tab Control inside the form.
I am updating a value in an unbound control on an unbound form. When the value in the control is changed I want a sequence of code to execute. Specifically changing the record source of a subform and refreshing it.
The problem I have is that when the value of the unbound text box is control is changed (I am using a button to change the value as a test) the after update event on the text box does not do anything.
I did a simple test using a button to change the value in the text box and in the afterupdate event of the text box asked it to output the value of the textbox to a message box as shown below.
The problem is this does not work, nothing happens. If I tab out of the text box or change the value with the keyboard however the msgbox appears. Just not via a vba change.
Code: Private Sub Prod_ID_AfterUpdate() Dim pid As String pid = Me.Prod_ID MsgBox pid End Sub Private Sub Button_Test_Click() Me.Prod_ID.SetFocus Me.Prod_ID = "TEST" End Sub
In my DB i would like to make a form that displays different calculated values based on other forms and queries like income running cost etc., but i do not know how to refer in an unbound control to value of a control in another form. I get always #names? error. However it worked when loaded that form i refered to. Is there a way to do it without loading the refered form?
I have an unbound control in data input form requiring to input a 6-digit number. I have put a validation rule restricting more than 6 digits. Most users prefer to enter, say 123 and the system can enter the 3 leading zero for them.
I am trying to create a database for a cub scout pack that just keeps scouts information, medical info, parents info, and parents medical info each is a seperate table. I have created a Tab controlled form with 4 tabs. On each tab the ONLY thing I have is a subform that contains the appropriate information. Each table has it's own form with the table as it's record source. I link the scouts table to the medical table by SID which is a primary key in the Scouts table. I link the Scouts table to the Parents table with a PID which is the Primary Key in my Parents table, and I link the Parents with the ParentsMed with a PMedID, key in the ParentsMed table.
Question #1 - Using a Tab Control you can only have 1 record source. What should I use? I have tried the tblScouts and I have also created a query with every field from every table.
#2 - When I try to use the parent and child links on the subform I get the error "Can't build a link between unbound forms" but each form is bound to the table and the record source on the tab control has had a table and my qryEverything, neither work. I can type in SID but it still doesn't function properly.
Any suggestions or comments on a better relationship method or any insight on how tab controls are supposed to be setup or anything would be greatly appreciated.
I have a from with unbound fields on and i have it set up so when you type in the field click the button - it runs a query and finds the records.
I have tried to add a combo box that gets the actual value from the field (avoids people typing wrongly) which it finds the values fine, but the query does not seem to be able to returns to results for that value selected via the combo box.
When I have my form I have an unbound control called rtdDate. In rtdDate's AfterUpdateEvent I have it run a append query. Within the append query I have the following:
RTD Date: forms!masterListQ!rtdDate
Yet it keeps coming up blank when you run the query. Its like its not finding the value of it. I'm sure you can tell I'm pretty much an amateur at database building but I thought this would be pretty easy.
Hey guys im really stuck on this one and hope some one can help me out.
I have the following structure:
Table: Products ID Product Name
Table: Suppliers ID Supplier Name
Table: Prices ID Product Name Supplier Name Supplier Offer
Query: QrySuppliers Prices.ID Prices.Product Name Prices.Supplier Name Prices.Supplier Offer Percent Off Trade: IIf(IsNull([Products]![Trade Price Euros]),0,([Products]![Trade Price Euros]-Nz([Prices]![Supplier Price],0))/[Products]![Trade Price Euros])
Because the "Percent Off Trade" field is unbound to a table I cant get the data into a report, instead every time I open the report it asks me for Products!Trade Price Euros :(
I've never tried doing complicated calculations in Access and would reallly appreciate any suggestions you guys could give me.
I tried to attatch the database but its 508kb so if anyone has a spare second and wants to check it out heres the link http://www.jeron.co.uk/Products.zip
I have a calculated value in an unbound textbox (avghcppmw). I want to run a query (qinsphistory) in which one of the fields is the value of the textbox (avghcppmw).
Is there any way to pull the value from the form and display it in the query. I'm assuming not.
I also assume the only way to do this would be to create a query that would calculate the textbox value and base (qinsphistory) on the newly made query.
I have a value in an unbound field on a Form, which is 1234 OR 765 OR 356.
In the QBE criteria grid, I used builder to reference this form:
Forms!myform!myunboundfield
The column this is in is for the ID field, which is a number.
However, it is not filtering the data correctly. If I copy the above text and paste it into the QBE grid, then it will work. But when I reference it, it fails. If I change the value to just a number on my unbound field, it works. So the issue seems to be that its bringing across the text as a string and so perhaps effectively puts quotes around it when referencing it.
I have a query that appends a new record to a table called "tblMain". The tblprogeny I am querying does not have two fields the 'tblMain' has (Group and Location). By the mere nature of this type data, the value for both fields are static thus I did not include them on the data entry form for the tblProgeny. I would like to include them on the append query if I can. One field is "Group"with the static value at "Non-Active" and the other is "Location" where the static value is "Nursery"
I have tried to use the following expressions in the criteria field of each respective field slot of the query:
[tblgroup.group to tblmain.group] 'Where ([tblgroup.group]= "Non-Active")'
[tbllocation.location to tblmain.location] 'Where([tblLocation.Location]= "Nursery")'
But it gives me an error that my syntax is not right? tblgroup.group to tblmain.
Am not getting a value from a form text box when using in the criteria line in my query. Am referencing like [Forms]![FormName]![FormLabelName]. If I copy the data in the form and paste it into the query, it works fine, but if I just reference the form, I get no results.
I have a main form (start_protocol) with an unbound subform (placeholderform).
Using a button in mainform I open a search form (search_protocol) inside the unbound form, by the code: ------------------------------------------------------------------- [placeholderform1].Visible = False [placeholderform].Visible = True Me.placeholderform.SourceObject = "SEARCH_PROTOCOL" -------------------------------------------------------------------- The search form (has a run query button) is build from a query named: search_protocol.
I want to be able, as soon as I pass the button, to have the results (from the query) inside the unbound subform, of the main form (Start_protocol).
I am trying to find a way to allow the user to enter multiple numbers in an unbound box that I will pass to a query as parameters. I already have it set up to pas the parameters from the form but if i try to do more than one number it doesn't work.
I have tried:
1306 or 1307 or 1308 1306, 1307, 1308 "1306 or 1307 or 1308"
I was reading somewhere that when the value is picked up from the form it is not like you are typing it right in the criteria box of the query.
So are there any other options here? Is there a way to enter all the number in a box and then use vba to create an array and then pass that to the query?