Copy/paste from Outlook to Access

  • Thread starter Thread starter Svenzardda
  • Start date Start date
S

Svenzardda

Hello All,
I copy a text from an Outlook 2003 email (right-click/copy) and I
paste it into an access form textbox with the help of a paste button.

Private Sub cmd_Paste_Incident_Click()
fld_Incident_Details.SetFocus
DoCmd.RunCommand acCmdPaste
End sub

When pasting, I want to remove the enter symbols CHR(10) or CHR(13)
like the following example:
"blablabla


blablabla"

to become:
"blablabla
blablabla"

The problem is on how to access what's currently in the memory to
remove the enter symbols and paste a neat text.
Regards,
 
Hello All,
I copy a text from an Outlook 2003 email (right-click/copy) and I
paste it into an access form textbox with the help of a paste button.

Private Sub cmd_Paste_Incident_Click()
fld_Incident_Details.SetFocus
DoCmd.RunCommand acCmdPaste
End sub

When pasting, I want to remove the enter symbols CHR(10) or CHR(13)
like the following example:
"blablabla

blablabla"

to become:
"blablabla
blablabla"

The problem is on how to access what's currently in the memory to
remove the enter symbols and paste a neat text.
Regards,
Click to expand...

It seems I found a solution :
I added the following codeline after the Paste:
fld_Incident_Details = Replace(fld_Incident_Details, vbCrLf & vbCrLf,
vbCrLf)
 
Back
Top