save email from excel

Status
Not open for further replies.

shahroozbral

New Member
Outlook version
Outlook 2013 64 bit
Email Account
POP3
Dear Sir
wishing you a good day.

we have a Excel VBA code that saves the selected email from outlook and hyperlinks a cell to it. but the problem is when the selected email is from a search result on "All Mailboxes". I would be thankful if you check what the problem is and let me know.

Sub LinkToQuotation()
Dim oMail As Outlook.MailItem
Dim objItem As Object
Dim sPath As String
Dim dtDate As Date
Dim sName As String
Dim enviro As String
enviro = CStr(Environ("USERPROFILE"))
For Each objItem In ActiveExplorer.Selection
Set oMail = objItem
sName = oMail.Subject & ".msg"
ReplaceCharsForFileName sName, " "
sPath = "D:\Dropbox\calc quotations\"
Debug.Print sPath & sName
oMail.SaveAs sPath & sName, olMSG
Range("E3").Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=sPath & sName, TextToDisplay:="Link to Email"
Next
End Sub


Best Regards
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
nathandavies Email Details to Excel & Save as .MSG on one macro - combination of 2 macros Outlook VBA and Custom Forms 3
E Outlook 365 Save Selected Email Message as .msg File - oMail.Delete not working when SEARCH Outlook VBA and Custom Forms 0
E Save Selected Email Message as .msg File - digitally sign email doesn't works Outlook VBA and Custom Forms 1
M Outlook Macro to save as Email with a file name format : Date_Timestamp_Sender initial_Email subject Outlook VBA and Custom Forms 0
D VBA Macro to Print and Save email to network location Outlook VBA and Custom Forms 1
N Save Selected Email Message as .msg File Outlook VBA and Custom Forms 12
G Save and Rename Outlook Email Attachments Outlook VBA and Custom Forms 0
9 Outlook 2016 How to save an Outlook attachment to a specific folder then delete the email it came from? Using Outlook 1
W Save and rename outlook email attachments to include domain name & date received Outlook VBA and Custom Forms 4
V VB script code to save a specific email attachment from a given email Outlook VBA and Custom Forms 14
C Auto save outlook attachments when email is received Outlook VBA and Custom Forms 1
Diane Poremsky Save Selected Email Message as .msg File Using Outlook 11
Diane Poremsky Save Outlook Email as a PDF Using Outlook 0
B VBA Help Email that will save as draft and send as attachment Outlook VBA and Custom Forms 3
C Save Subject of Received Email as a String Outlook VBA and Custom Forms 1
C Rule To Save attachments on receipt of email Outlook VBA and Custom Forms 2
M Question: Is there a rule that will save email in Windows Explorer Outlook VBA and Custom Forms 3
M Save selected email message as .msg file (with user to choose folder location) Outlook VBA and Custom Forms 14
M VBA code to save email attachments (PDF) as email subject line Outlook VBA and Custom Forms 1
D Save downloaded images with the email Using Outlook 2
D Save sent email in second account not default account? Using Outlook 1
K Save a received email in a mailbox subfolder which is the same as the @email Using Outlook 1
E can't save draft email in Outlook 2010 Using Outlook 2
M Rules - daily status (email) doesn't change much daily, save 1 per week how? Using Outlook 1
D Save Current email in Directory. Outlook VBA and Custom Forms 1
M Save incoming Email as .html file with name of subject line Outlook VBA and Custom Forms 3
J Code to Save Email as an .MSG to Directory when Emails Arrive Outlook VBA and Custom Forms 4
J Save attachment if email is from joe Outlook VBA and Custom Forms 4
H Program email save as text file Outlook VBA and Custom Forms 5
T Is it possible to save email body without header? Outlook VBA and Custom Forms 6
P Save Email as .msg File with Code Outlook VBA and Custom Forms 5
G Save emails as msg file from Outlook Web AddIn (Office JS) Outlook VBA and Custom Forms 0
C Outlook 365 Copy/Save Emails in Folder Outside Outlook to Show Date Sender Recipient Subject in Header Using Outlook 0
W Create a Quick Step or VBA to SAVE AS PDF in G:|Data|Client File Outlook VBA and Custom Forms 1
C Outlook (desktop app for Microsoft365) restarts every time I save my VBA? Using Outlook 1
N VBA Macro To Save Emails Outlook VBA and Custom Forms 1
N Save emails within a certain date range to network drive Outlook VBA and Custom Forms 0
T Outlook 365 Move newly created tasks automatically on save. Outlook VBA and Custom Forms 1
G Save attachment run a script rule Outlook VBA and Custom Forms 0
G VBA to save selected Outlook msg with new name in selected network Windows folder Outlook VBA and Custom Forms 1
D Outlook 2016 64bit, Cannot Save in 'HTML', format Using Outlook 1
N Save selected messages VBA does not save replies and/or messages that contain : in subject Outlook VBA and Custom Forms 1
L Macro to add Date & Time etc to "drag to save" e-mails Outlook VBA and Custom Forms 17
S save attachment with date & time mentioned inside the file Outlook VBA and Custom Forms 0
S Add VBA save code Using Outlook 0
A Edit attachment Save and Reply Outlook VBA and Custom Forms 0
S Outlook (2016 32bit; Gmail IMAP) - Save sent message to Outllook Folder Outlook VBA and Custom Forms 0
P Outlook pst file is too huge with POP3. How to save more space? Using Outlook 4
D Prevent popup of "Do you want to save changes?" when closing after opening an appointment to view Outlook VBA and Custom Forms 2
A Unable to save recurring Meeting to Documents folder due to error Using Outlook 2

Similar threads

Back
Top