Memo Madness 2

narcan2k

Registered User.
Local time
Today, 14:54
Joined
Mar 11, 2003
Messages
12
Now that the cold is gone... let me try to explain this proper.

What i am trying to do is this:

The db i am creating will be used to update client information. there is a section for case notes on the form. I want to create a macro that will cut the text from memofield1 and paste it to memofield2 on the same section of the form. memofield 2 will be read only.

In addition, I need the text pasted into memofield2 to be added to text already there so that it dosn't overwrite previous notes.

One more little detail. I have a command buton that time and date stamps into a memmo field however i cant figgure out how in the name of the access gods to have it stamp the memo and start a new line so that the notes entered will begin on the next line in the memo. I did it once before but cant seem to make it work again.

Please help!
 
Okay, here you go:

Assuming you want to use a command button to time stamp things and move them at the same time:

Private Sub Command1_Click()

txtMemo2 = txtMemo2 & VBCRLF & txtMemo1 & VBCRLF & Now

End Sub


If you want the date/time above each entry, just switch the positions of Now and txtMemo1 in the code above. Also, if you want to put in a blank line before each memo, then use this instead:

txtMemo2 = txtMemo2 & VBCRLF & VBCRLF & txtMemo1 & VBCRLF & Now


VBCRLF by the way, is Visual Basic Carriage Return and Line Feed
 
THANX!

Oh my god! thanks man! I'll try it and let you know.
 

Users who are viewing this thread

Back
Top Bottom