GORD - AWESOME! It worked for my main form (Site Information). However, it's not working for my "sub" form. Let me explain how these forms are set up: Site Info (Primary key - CustomerID)is the first form they'll enter. This duplicates fine. There is a command button on this form...
GORD - O.K. - I'm beginning to think my way is going to be impossible. Back to your earlier post:
"MelF, it's still kind of a dangerous proposition in any case... You might be better off to run one at a time as per MS, then do something like:
Forms!nameOfForm.setfocus...
GORD - Thanks for your response. To explain: Yes, that is my goal. This will eliminate A LOT of data entry for the employees. There will no doubt be minor changes to be made to each added record, but will still significantly reduce the typing within EACH added form. I do want each added...
UPDATE: I've put the following code into the command button that duplicates the record:
Private Sub btnDuplicate_Click()
Dim dbs As DAO.Database, Rst As DAO.Recordset
Dim F As Form
'Return Database variable pointing to current database.
Set dbs = CurrentDb
Set Rst = Me.RecordsetClone
On...
I have an Orders form that includes a Kit Ready date. On this form also is a command button (Packing Slip) that opens up the Packing Slip (report) associated with that order. I want to make a report or make a macro to put in the OnOpen event of new report that pulls up all Packing Slip reports...
O.K. - This is working, but when I close and go back in, it's not saving it. (When I click the checkbox, it grays out the other control, but when I exit and go back in, the control is no longer grayed out, just the box is still checked.) Here's my code that's in the checkbox:
Private Sub...
I have a form that has four "sub" forms. (They're not technically "sub" forms, but regular forms, linked to the one main form.) They are all linked using the Customer ID (primary key in Customers table). The record source for all forms are:
Form...
OMEGA - Thanks for the response. Someone suggested that I take the brackets off the field names, so now I have this code:
Private Sub LocationDataCheck_BeforeUpdate(Cancel As Integer)
If Me.LocationDataCheck = -1 Then
Me.LocationDataEntered.Enabled = True
Else...
I have a checkbox (LocationDataCheck), and a text control (LocationDataEntered). When LocationDataCheck is checked, I want LocationDataEntered to be disabled. I've put the following code into the OnClick of LocationDataCheck:
Private Sub LocationDataCheck_AfterUpdate()
If...
GORD - Thanks again!!! I was trying to do this in SQL view and not having much luck, but tried it in regular design view - And it works!!
Thanks!!!!
-Melody
Question of the day:
I have a custom dialog box (form) that prompts for criteria, then opens my report based on the specified criteria (Begin date, end date, and ProductName) It is working fine, and the query behind my report is:
SELECT DISTINCTROW ProductsUsedbyDateQuery.ProductName...
GHUBBELL - Thanks for your reply. I just got it to work!!!!! I was missing the >= signs in my criteria in my query. That seems to have fixed it. We'll see!!
Thanks again!!
O.K. - I am very confused. I don't know how to get this to work. I've tried your suggestions:
1. I put an OpenReport macro on the O.K. button of my form, it opens the report, but with no info. ???
The query that my form is based on works fine, using the parameters I've put into it (begin...
I've created an unbound form that prompts for report criteria. I know I've left something out somewhere, because when I run the report, which pulls up this dialog box, I enter the criteria I want, then I get this error:
The object doesn’t contain the Automation object ‘DateRangeForm’.
You...
This sounds so simple, but I can't do it. I'm in my Switchboard Manager, trying to move the item Enter/View Orders by Employee to the second from the top of the list. I click on the Enter/View line, then click the Move Up button. This doesn't move what I've selected, but merely selects the...
GHUBBELL - Thanks so much for your post. I copied your query and substituted the name of my query for the name you gave it, so it came out like this:
SELECT DISTINCTROW ProductsUsedbyDateQuery.OrderID, ProductsUsedbyDateQuery.OrderDate, ProductsUsedbyDateQuery.ProductID...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.