Copy/Paste from one bound text Box to another 1

[Pistol]

I have a form containing: Name, address, city, state, et cetera (for "SoldTo" information). If the "ShipTo" information is the same as the "SoldTo" I would like to copy the "SoldTo" fields and paste them into the "ShipTo" fields. This way the user would not have to enter the same information twice.

I have tried using a macro to do this (using "SetValue&quot, but it will not work. I have tried building an expression, but I am not very familiar with it. I have also tried with code, but cannot get that to work. I've pasted the code below for you to look at:

***********************************************
Private Sub CmdCopy_Click()
DoCmd.GoToRecord "SoldToCustomerName"
DoCmd.RunCommand acCmdCopy
DoCmd.GoToRecord "ShipToCustomerName"
DoCmd.RunCommand acCmdPaste
End Sub
***********************************************
I am also using Access 2000

Thanks in Advance

 

[Aivars]

Hi!

Private Sub CmdCopy_Click()
me.ShipToCustomerName = me.SoldToCustomerName
End Sub

Aivars

 

[Pistol]

Thank You...Worked like a charm