Making specific fields in a current record copy themselves when making new record

[gunwax]

Hey everybody,

I am working on a database used in recording device characteristics/test information. The main table of information has dozens of columns for test/part detailed information. When inputing the data for each specific test, many of the info. details are repeated when testing say 20 devices of the same part all at once. Rather than retype every piece of detailed information in every field, everytime, is there an easier way? Does anyone know of a way to make specific fields copy/paste the previous record's information in the fields automatically when a new record is created? Please, if anyone could help or has ANY ideas, let me know...

Thanks

gunwax

 

[gunwax]

additional details

in addition, i have not been inputting the test data directly into the table view. I created a form that has all of the fields for inputting data. This simply makes inputting a lot more visual and prettier rather than scrolling my window back and forth all of the time through all of the columns in my table. I don't know if this makes a difference, just wanted to add the details.

gunwax

 

[Sergeant]

If you regularly enter the same details for a device, perhaps you should store each device's details in a separate table.

 

[MarkK]

Textbox's DefaultValue property...

Might be what you're looking for...

Private Sub tbText_AfterUpdate()
Me.tbText.DefaultValue = Me.tbText
End Sub

 

[gunwax]

Thanks

Thanks for the advice, I'll give that piece of code a try

 

[gunwax]

added info

i have found that this piece of code works well for numbers because it is drawing from the default value field, however, what would be the best way to auto copy text records, using the "*.Tag" option? Is there a better way?

 

[gunwax]

etc...

I've played around with the sample code a bit more. It works for numerical entries. However, when I try to apply it to text I get something like "#Name?" in the field after I create a new record. I think I need to make the code automatically put quotes around the text input before it tries to auto copy it to the next record. That way, it will register the text. Does anyone have any ideas on how to put this into coding?

 

[MarkK]

Maybe...
"""" & Me.tbText & """"

 

[gunwax]

thanks

Hey Lagbolt,

Thanks for that bit of info. It really helped. (Saved me tons of time too)

 

[biskra]

       DoCmd.GoToRecord , , acNewRec

If Me.NewRecord And Me.CurrentRecord > 1 Then
Me.tbText= DLast("[tbText]", "table")

replace table with the name of your table