If on enter, auto fill from another field, otherwise enter new data

[FIZGIG]

Newbie(ish) question:

The title is the what I'm trying to do. This is what I have done that works BUT if anyone accidentally clicks on, tabs through, or enters the field, it puts in the data from the related field. I want it to save any new data and not allow any accidental changes.

Private Sub CASE_COST_Enter()


[CASE_COST] = [CASE_COST2]
End Sub

Case_Cost is a field in a new PO form. Case_cost2 is from a query that lists last purchase price.
Any suggestions?
TIA
CS

[pbaldy]

Probably not the event I'd use, but does this work?

If Me.NewRecord Then
  [CASE_COST] = [CASE_COST2]
End If

[FIZGIG]

Thanks for the reply. No, it didn't work. What event would you use?

[pbaldy]

Perhaps

If Len(Me.[CASE_COST] & vbNullString) = 0 Then
  [CASE_COST] = [CASE_COST2]
End If

The enter event requires the user to "enter" that control. I don't have the big picture of what you're doing, but I'd prefer an event that didn't require the user to do anything in any particular order.