?
Solved

How to resend message via VBA

Posted on 2007-12-06
1
Medium Priority
?
364 Views
Last Modified: 2010-05-18
Hi all,

I can retrieve sent messages via VBA and I would like to send them again. Normaly I would click on commandbar ACTION, RESEND, but how to do the same via VBA?

many thanks

V.
0
Comment
Question by:vladobb
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 
LVL 59

Accepted Solution

by:
Chris Bottomley earned 1500 total points
ID: 20425921
Sub test1()
Dim myObj As Object
Dim myMail As mailitem

    Set myObj = Application.ActiveInspector.CurrentItem
    If myObj.Class = olMail Then
        Set myMail = myObj
        myMail.Send
    End If
End Sub

OBviously any edits you want to make need to be done before the send is actioned!

Chris
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Read this checklist to learn more about the 15 things you should never include in an email signature.
In this step by step procedure, you will come to know the details of creating an Outlook meeting in 2007, 2010, 2013 & 2016.
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…
This is my first video review of Microsoft Bookings, I will be doing a part two with a bit more information, but wanted to get this out to you folks.
Suggested Courses

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question