Responder a un mensaje de correo electrónico mediante vba
Una macro me envía un correo por un gestor de correo llamado groupwise. Hasta ahí, sin problema.
Esta es la parte de la macro que crea el mensaje y envia:
Set ogwApp = CreateObject("NovellGroupWareSession")
DoEvents
End If
If ogwRootAcct Is Nothing Then 'Need to log in
'Login to root account
If Len(StrMailPassword) Then 'Password was passed, so use it
sCommandOptions = "/pwd=" & StrMailPassword
Else 'Password was not passed
sCommandOptions = vbNullString
End If
Set ogwRootAcct = ogwApp.Login(StrLoginName, sCommandOptions, _
, egwPromptIfNeeded)
DoEvents
End If
Set ogwNewMessage = ogwRootAcct.WorkFolder.Messages.Add _
("GW.MESSAGE.MAIL", egwDraft)
DoEvents
ogwNewMessage.Recipients.Add "[email protected]", NGW, egwTo
With ogwNewMessage
If Not StrSubject = "" Then .Subject = StrSubject
If Not StrBody = "" Then .BodyText = StrBody
If Not strAttachFullPathName = "" Then .Attachments.Add strAttachFullPathName
On Error Resume Next
.DelayedDeliveryDate = DateAdd("n", 10, Now)
.Send
DoEvents
On Error GoTo 0
End With
Set ogwNewMessage = Nothing
Set ogwRootAcct = Nothing
Set ogwApp = Nothing
DoEvents
End SubMirando en las instrucciones que puso eldesarrollador de groupwise para VBA, veo que se puede responder a un mensaje, y dice esto literalmente:

¿Y mi pregunta es como podría adaptar esto para contestar a un mensaje recibido?