OT: Outlook and copying sent/received over to a folder

[Harry Bloomfield]

I want to email copies of several hundred emails over to a separate folder, in order to email them as a zip and have found a problem...

Many of the emails have the same Subject line, so the 2nd email with the same subject line will want to overwrite the first. For instance the first email copy to the folder might be called RE: XYZ, the second one where I have replied the first one will also have the same name ad try to overwrite the first.

I'm highlighting the emails I want to copying in Outlook, then dragging and dropping in a folder.

Has anyone found an easy way to do this, but yet allow them to be opened up in Outlook on delivery please?

[Lobster]

Create a new Outlook Data File (.PST file) and copy the desired emails to that; then zip the .PST file and email that, then the recipient can open the .PST file at the other end

David

[GB]

Your best bet is a macro that gives each email a unique name, then copies each one separately to a folder as a .msg file. Then zip up the folder and email it.

I use this macro:

Sub SaveSelectedMessages() Dim olItem As Outlook.MailItem Dim fName As String Dim fPath As String Dim MyRecdSent As String

fPath = "C:\Test\" 'the folder path to save the documents For Each olItem In ActiveExplorer.Selection

If olItem.ReceivedByName = "" Then MyRecdSent = "Sent" Else MyRecdSent = "Recd"

fName = Format(olItem.ReceivedTime, "yymmdd") & Chr(32) & Format(olItem.ReceivedTime, "HH.MM") _ & Chr(32) & MyRecdSent & " - " & olItem.Subject & ".msg" fName = Replace(fName, Chr(58) & Chr(41), "") fName = Replace(fName, Chr(58) & Chr(40), "") fName = Replace(fName, Chr(34), "-") fName = Replace(fName, Chr(42), "-") fName = Replace(fName, Chr(47), "-") fName = Replace(fName, Chr(58), "-") fName = Replace(fName, Chr(60), "-") fName = Replace(fName, Chr(62), "-") fName = Replace(fName, Chr(63), "-") fName = Replace(fName, Chr(124), "-") olItem.SaveAs fPath & fName Next olItem Set olItem = Nothing End Sub

Just select the emails you want and run the macro.

HTH

[fred]

In article , Lobster writes

Agreed, the only issue on duplicate subject names is if each email is exported as a separate file, copying the relevant emails (within Outlook) to a separate pst file and importing that at the new destination should overcome this issue (far easier than it could be done in outlook excuse).