Thanks John,

I'll make do with

Private Sub Notes_AfterUpdate()
Me.Notes = Me.Notes & " " & Now() & " "

End Sub

I will only be adding notes to my notes field 3 or 4 times max in my two sub
forms so scrolling wont be a problem. I already have calls log table which
will be be my main notes records also as a sub form.

Many thanks

Allan

John Vinson wrote:
I'm sorry Douglas I have explained exactly what I would like to do right from
the very start and I will repeat :
[quoted text clipped - 6 lines]
answer various people who have tried to help and I appreciate all the help
and advice given so far.

Have you *intentionally rejected* the normalized solution, using a
Notes table related one to many to this table? This could have a
date/time field defaulting to Now(), a foreign key to your main table,
and a Text or Memo field for the note; you could display it in reverse
chronological order in a subform/subreport; you could much more easily
search for a note based on a date/time range or vice versa. Having all
of the notes and dates jammed together in a single memo field makes it
much harder to search, especially if you want to associate a note with
its date!

If you REALLY want it this way anyhow, you'll need to update the field
in VBA code; e.g. have two textboxes, txtMemo bound to the memo field
and txtNewNote, unbound. In your code you could use

Private Sub txtNewNote_AfterUpdate()
Dim strNew As String
strNew = GetUserID & " - " & Format(Now, "mm-dd-yyyy hh:nn") & vbCrLf
strNew = strNew & Me!txtNewNote & vbCrLf
strNew = strNew & Me!txtMemo

Me!txtMemo = strNew

End Sub

John W. Vinson[MVP]

--
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...forms/200611/1