Jun 30
I’m in software sales and I want to send out my own little marketing emails and I don’t have all these email addresses in my contacts, they are all just in there from people I’ve cold-called and followed up with. Or maybe people that were interested and never bought. I just want to export every single email address in there. Is there a way to do it?
Ok but remember they aren’t in my contact list though…. these are just random addresses I type in as a one time use…. it will pull all of them?
Yeah that doesn’t work it’s just the one in the contact folder.



July 1st, 2009 at 6:34 pm
Please backup your contacts before trying this, to backup go to file, export, expor to a file, next, click pst, next, click contacts folder, put path and name of pst to the 1st then click finish button.
Open outlook, Alt+F11, to go to vb editor, on the right blank area add the code below,
Sub AddSenderToContacts()
Set conobj = Application.GetNamespace( “MAPI”).GetDefaultFolder( olFolderContacts ).Items
On Error Resume Next
For a = 1 To Application.GetNamespace( “MAPI”).GetDefaultFolder( olFolderInbox ).Items.Count
Set objMail = Application.GetNamespace( “MAPI”).GetDefaultFolder( olFolderInbox ).Items(a)
For Each sndr In objMail.Reply.Recipients
strAddress = sndr.Address
If strAddress = “” Then strAddress = sndr.Name
For i = 1 To 3
strFind = “[Email" & i & "Address] = ” & strAddress
Set econobj = conobj.Find( strFind)
If Not econobj Is Nothing Then
Exit For
End If
Next
If econobj Is Nothing Then
Set econobj = Application.CreateItem( olContactItem)
With econobj
.FullName = sndr.Name
.Email1Address = strAddress
.Save
End With
End If
Set econobj = Nothing
Next
Set objContact = Nothing
Set objMail = Nothing
Next
Set conobj = Nothing
End Sub
Click once in the code, then hit F5, all senders address form emails in the inbox will be compared with the contact’s, if no match a new contact will be created.
July 1st, 2009 at 7:01 pm
go to File > Import and Export
select Export to a File
you can then select a format to export to (excel, access, comma delimited, etc). Then select which folder to export (like inbox or sent items, etc).
then just open the file in whatever format/program you selected. You could then clean up the files (remove duplicates, etc) and use some program to do a mass mailing using that data.