I found and pasted some code which copies records from the previous record on the form. Seems to work well, but I was wondering if there is an issue with the copying of the first field which is a combo box?
View RepliesI have an access form that needs filling in daily by various people.
It's to document changes to a website and I currently have a combobox box set up for the various sections to state whether they are AMENDS, REVERTS or NO CHANGE.
I have set conditional formatting to then highlight these sections but am also trying to get it to work so that if the user chooses "NO CHANGE" then the data for that field copies over from the previous record.
I have set this up in the AfterUpdate code for the combobox, but nothing is happening, not even an error....
Code:
Private Sub COMBOBOX1_AfterUpdate()
If Me.COMBOBOX1 = 3 Then
Me.[FIELD_TO_CHANGE] = DLookup("[FIELD_TO_CHANGE]", "tb_TABLE", "[ID]=Forms![form_FORM]![ID]-1")
End If
End Sub
(Where 3 is the value of NO CHANGE in the combobox, and FIELD_TO_CHANGE, tb_TABLE and form_FORM being the names of the various elements)...
I am tasked with creating a scientific database of fish catches at various different sampling stations. I envisage the entry form having hierarchy levels, ie year, season, date, sample station, species caught, and then the specific associated data with each species (weight, abundance, length etc) will form each distinct record.
In each year there are 2 sampling seasons. In each sampling season there are up to 20 dates on which samples are taken. On each date there are up to 50 sample stations recorded. And at each station up to 20 species can be recorded.
In order to enter each species caught in a survey, the end user will potentially have to fill the season box with an entry 40,000 times. For each season there will be 20,000 date entries to be made. For each date, 1,000 station code entries, and 20 species entries for each station. What I would like to happen is this.
When the end user is entering the data, he or she will be working through the hierarchy from the ground up. Ie., they will enter a particular species' data (abundance, weight, length etc) at a particular station on a particular date during a particular sampling season. The next entry will be a different species at the same station on the same date during the same season. I would like the duplicated information from the previous record to be copied across onto the new one so that all the end user has to do is enter the species name, abundance weight and length data.
Once they have finished entering all the species data for that particular site, they can move onto the next site which they would fill in the data themselves for the station code. So, in the hierarchy, the first button would copy all the previous data except the species name and associated weight length abundance data. The next button would do the same, except leave the station code blank. The next button would leave the species name, station code and date blank. And so on up the hierarchy. The end user would be able to selectively choose which data is copied over by using these buttons, saving lots of potential extra work doing repetitive entries.
Hi
I need to copy some data from last record to next(New record), when a user clicks a button on a form. I don't want to copy all the data.
An example would be booking in items from an invoice:
Company would be the same
Invoice number would be the same
Product code would be different
quantity would be different
Hope this makes some sence, and i'm not being stupid:rolleyes:
Andy
Suppose I have a customer database. Is there a way if I click on a button, it will create a new record and copy some of the info from the previous record?
View 1 Replies View RelatedIt is a continuous subform (Names: Form = ClientUpdate / Subform = ClientUpdateSub.
All of the data implicated here is direct and in the subform's query table including the button we want to program.
(This is my example but it wont stay in columns in this "post box" )
IDNo App _ID App_Freq App_Date GetDates Action_Date
22 18 56 21-Jun-13 BUTTON 14-Jun-13
21 19 56 16-Aug-13 BUTTON 9-Aug-13
*
The GetDates Command BUTTON should generate the red data above, like:
Private Sub GetDates_Click()
Go to a new record
Go to the field App_Freq and fill it with:
Copy/paste the data from the field of the same name in the previous record
Go to the field App_Date and fill it with:
data based on this calculation using the PREVIOUS record fields: App_Date + App_Freq (which are days)
Go to the field Action_Date and fill it with:
data based on this calculation: App_Date (of current record now filled out - step above), minus 7 (days).
End Sub
That's it!
All the dates format is set to medium date. An error message should come up in case App_Freq is empty, for example
Also note that the data can be manually changed at any time and should not revert to its last calculation. The button only generate data into a new record.
I need to know how to auto enter the date of the previous record into a new record. I have this db for my vehicle log sheets and I submit monthly a claim for the business km from my company. I usually cant remember the date of the previous claim and have to scroll back until I find the field with a date. It will be useful if the date was copied into every new record until I edit the date when I submit the claim. What I ask is during the new month all the dates will be the same until I submit the claim. I do not know how to do this, and yes I have done a search.
View 3 Replies View Related i am using this query to insert the previouse balance into arrears as shown in the figure. it will insert some record correct and some are not correct.
SELECT fees.[gr no], sum((Admission+Registration+Fees.Tuition+[Fine]+Fees.Transport+[Exam]+[Misc])-Fees.Paid) AS bala
FROM fees
WHERE fees.balance<=0 and [gr no]=[gr no]
GROUP BY [gr no];
I have the employee data record... I want copy of the same record to insert in table but with different employee id and Site through forms. StaffNo is the primary key.
For example
existing record
StaffNo, Site, Name, hiring date, etc
AKA-111, 10, John, 25-10-13
new record
StaffNo, Site, Name, hiring date, etc
ALM-123, 14, John, 25-10-13
I am creating a database for an annual golf tournament. Part of this is to allocate players to play off together at certain times.
I have a form bound to a table called tblteeofftimes. This form has five fields (continuous form) - four of which are comboboxes whereby user selects each player for the record (who will play together). The other textbox has the tee off time. the first tee off time will be allocated by user eg 7:00 am.
My problem is I need to update each ensuing record with a new time slot at 7 minute intervals. Rather than have the user populate the form themselves I would prefer this be done authomatically as the user moves onto the next record.
I have a Main form that has button that loads a new Pop Up form for entering new data that will display in the Main form. When all the data is entered I click on a button that Saves the data and exits the form and then runs Re-query on the main form returning to the record that was current before the requery.
I have the following code:
Private Sub cmdSaveTradeAndExit_Click()
DoCmd.RunCommand acCmdSaveRecord 'Save the current record
DoCmd.Close 'Close the current form
Dim CrId As Integer
CrId = Forms!frmTransactionMainActivePopUp.CurrentRecord
Forms!frmTransactionMainActivePopUp.Requery
DoCmd.GoToRecord , Forms!frmTransactionMainActivePopUp, acGoTo, CrId
End Sub
But I am getting the following error:
Run-time error '2498':
An expression you entered is the wrong data type for one of the arguments
And the following is in yellow in the debug:
Code:
DoCmd.GoToRecord , Forms!frmTransactionMainActivePopUp, acGoTo, CrId
I'm trying to create a security measure that would prevent a user from accidentally paging down in a form and moving to the next record. I want to create an event macro that would fire if the user accidentally paged down into the next record. The macro would simply move back to the previous record.
What event would I use to build the macro ? What action would return to previous record ?
What's the best way in an update query, using access 2003, to update data in a record based on the previous record having an identical value in a certain field?
For example my data looks something like this, in this example I want row 2 to fill in the blanks with the data from row 1 as they both have the same ID number at the end highlighted in red:
1 2 Anywhere Street 1 2 1 1 5423
2 4 Anywhere Street . . . . 5423
3 6 Anywhere Street 1 2 1 1 6401
4 8 Anywhere Street 1 2 1 1 6402
I've found various threads here on how to copy the whole record but I only want to copy the data from certain fields. More oftem than not the fields I'll be copying to will be NULL.
how to reference a field from the previous record within an update query I could probably work it out from there?
I have a Contacts subform and would like to be able to double click to fill addresses, and details from the previous row...every person in our database even those living at the same address needs thier own record.. and since we only need to fill up to 5 records and review them, double clicking on the first name to fill up the next row with the previous addres phone number ect would be grand.
I am assuming we could fill out the new Full Name and double click on it to get the previous record filled to the new one. Don't really want to work with a query unless needed, but I have a little vba understanding.. how do I code this to make it work?
Full_Name_Dbl_Click
getPreviousRecord.Address(-1)
getPreviousRecord.Phone Number(-1)
getPreviousRecord.City(-1)
In my database scenario, a patient would see a doctor and the doctor would check off fields in a form representing different disease symptoms that the patient has to calculate a final score (for ex. if the patient has 2 symptoms, the final score would be 2).
After a few months, the patient would visit the doctor again, and the doctor will have to fill out the same form, adding any new symptoms the patient might now have. I would like to have the disease symptom fields checked off in the previous visit automatically show up in the new form, so that the doctor only has to add the new symptoms, and then recalculate the score using both the old and new data (for ex., if the patient had 2 symptoms before and 3 more symptoms now, the score would be 5).
There is a form which the user fills in 8 fields and saves it. Once saved, a new record opens.
However, I want to modify the save button to save the previous record and display a new record with only a limited no of fields to display from previous record, say 4 fields display from previous record, and the user fills the remaining 4 and saves it. Thus, the save cmd should continue to display 4 fields from the previous record.Already tried below code for save button but it displays all data of previous record as it is, doesn't display blank space for combo.118 and text2
DoCmd.GoToRecord , , acNewRec
DoCmd.GoToRecord , , acPrevious
Combo118.Text = ""
text2.Text=""
I wish to highlight some fields on a form if their value differs from the previous record.
I'm OK with the code to determine this, but unsure as to where to put the code to set the fields initially?
I have two strings txtPrevPayment_Method and txtPrevProduct.
Where can I set them 'once' to be the same as the first record loaded in the form. Then in the Current event I check if they have changed and set font colour accordingly.
I have fields on a form for the Date, the Start time and the Finish time. These won't change for the next 120 records. So, upon opening a new record, I'd like the Date and times to appear there already. But here is the crux: After about 120 entries, the date and Time changes, for the next 120 entries. So, once the 'batch' is finished, or I close access, the values do not need to be remembered until I enter a new record.
I copied something like the following from a book and tried running it with various modifications, just for the Date to start with, but no luck. (It did strike me as too simple for something, clearly, as unbelievably TRICKY as my problem...) I did find quite a few posts on this here but none seemed to work for me, or made sense to me in the slightest. (I did mention that I'm a complete rookie, didn't I?)
Private Sub Acquired_date_AfterUpdate()
Me!Acquired_date.DefaultValue = "'" & Me!Acquired_date.Value & "'"
End Sub
Currently I have created a data base and form. I am at a point where I need to copy data from one record specific field to a different field in the new record all while creating a new record.
Create a new record
Copy field in LastWeekInfo current record
to
New record ThisWeekinfo field
I have uploaded a small database. I keep track of payments for people who receive a language proficiency allowance. Usually the members receive this allowance for two years. Sometimes they receive it for one year.
Lang Level DateQuaFrom DateQuaTo DatePd From DatePd To
Hindi Inter 15-Dec-12 14-Dec-14 15-Dec-12 14-Dec-13
Hindi Inter 15-Dec-12 14-Dec-14 15-Dec-13 14-Dec-14
There is a field called NoOfPays . If this field value is 2 in the first record then I want it to insert a second record as shown above. How do I do it. I tried to append but it is not working.
Now copying the record with the maxID is not correct.
Let's say, I'm updating a record, and I have a combo-box that says transfer and another combo-box that states "where to?" - or words to those effect.
Each record has a field for credit value and a field for debit value.
When I've finished entering the current record, I want to run code that fires the event, so, copies all the data from one record, to create a new record, BUT...
1) changes the "where to" from the old record to "From" in the new record.
2) changes either the credit or debit value, to the opposite in the new record?
I would like to do this from a sub-form. I can copy a whole record, no problem, but can't seem to change field values.
I've recently decided to move a database that had all its information on 1 table and divided it into multiple tables.
Attached is the relationship as well as the form.
The issue I have is that when I click the form, it only shows a blank record with none of previous records.
Data entry is already set to NO. I'm wondering if it's an issue with my relationships, tblStudioDescription is the parent table and the others are child tables so I linked them with the ID and set referential integrity.
I've rebooted my copy record button and just used the macro wizard for now, it seems to work as far as I can tell but there is something strange about it.
I've added in some text boxes so I've got some confirmation, but when I click this copy button I get the following error;
"The command or action 'RecordsGoToNew' isn't available now."
I have a form with 2 subforms, each based on their own table. One displays categories of invoices (e.g. rent, electricity, etc.) including some details like monthly costs.
I would like users to be able to select one of those categories and copy this to another table, after which they can enter on what date the invoice was paid, to make a history of payments.
At first I based fields in the history table on fields in the categories table so that you could simply pick a category from a combobox. I had an after update event on that combobox that also automatically set the 'costs' combobox to the matching price.
Worked fine, but had one snag: if I update the costs of a category in the categories table (e.g. the rent goes up) then all the costs in the history table was also updated because the fields got their info from that table.
So now I no longer have field from the history table based on the other table, and want to use 'set value' to copy values from one table to the other. I'd like the user to be able to somehow select a category with a single click on a button, and getting the info for that category copied. However, how can I get access to know from which record I want the fields copied?
Or is there a completely different way to get a history of payments that works much better?
I would like my users to be able to view stock items in one (sub)form and when they double click on an item, then certain data is copied to an orders (sub)form.
I have therefore embedded two unbound subforms into a master form.
The master form (Frm Stock) has no fields, but it has 2 subforms.
Frm_Stock_Subform and Frm_OrderDetail_Subform
So I have 2 problems here.
Problem 1:I would like the following code trigger when the user double clicks anywhere on the record that the user wants to order.Thus far, I can only make it fire only when the user doubl;es clicks in a specific field (in this case, the ID field is the trigger)
Problem 2:I cannot activate the Frm_OrderDetail_Subform in order to create the new record. (I have looked at this link - Refer to form and subform
Code:
Private Sub ID_DblClick(Cancel As Integer)
On Error GoTo Err_ID_DblClick
Dim MyOrderID As Variant
Dim MyStockID As Variant
Dim MyAmt As Variant
[code]....
I have a form that i input information into. I have a combo box labeled Addendum, you can select "yes" or "no". What i would like to do is if user selects "yes" then a new record needs to be copied with exact information form original, with the excpetion of a field labeled "tape review #" 1403310000 for example. "-AD" needs to be added to this new record after the review number. Also the field "tape review #" is indexed not to allow duplicate numbers.
View 1 Replies View Related