StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

POHow can I specify a "reply-to" address without specifying a database in lotus notes, through Excel VBA?
text
Body
copied!<p>I have the code to send an email through Lotus Notes 7. It works well. From what I've seen there are two methods of doing this, and only one of them requires that you specify a database. I'm using the method that doesn't require that, because multiple people will be using this code, and most of them don't know how to modify or read VB.</p> <p>What I want to do is set the reply-to portion of the email. I have tried every variation I can think of, and nothing seems to work (different errors for different ways).</p> <p>Thanks in advance,</p> <p>Aaron.</p> <pre><code>Sub Email_Atrack_Report(SubjectLine As String, _ AgentOracle As String, TMAddress As String) Dim NSession As Object Dim NUIWorkSpace As Object Dim NDoc As Object Dim NUIdoc As Object Set NSession = CreateObject("Notes.NotesSession") Set NUIWorkSpace = CreateObject("Notes.NotesUIWorkspace") Set NDoc = NUIWorkSpace.ComposeDocument("", "", "Memo") Set NUIdoc = NUIWorkSpace.CURRENTDOCUMENT With NUIdoc .FieldSetText "EnterSendTo", AgentOracle & "@Company.com" .FieldSetText "EnterCopyTo", TMAddress .FieldSetText "Subject", SubjectLine .FieldSetText "Body", "**PASTE Atrack HERE**" .GotoField ("Body") .FINDSTRING "**PASTE Atrack HERE**" Sheets("EmailOutput").Range("MessageBody").Copy .Paste .send .Close End With Set NUIdoc = Nothing Set NDoc = Nothing Set NUIWorkSpace = Nothing Set NSession = Nothing End Sub </code></pre>

Querying!

Guidance

An individual column

Larger individual text columns get their own page to allow for proper reading.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload