Save attachment if email is from joe

Status
Not open for further replies.
J

Joe

I need to save an attachment to a specific network drive/folder if an email

comes from a specific person. I know som excel vba but nothing in access,

can u guys help me out?

Thanks!~
 

Michael Bauer

Senior Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
You can create a rule in Outlook to run a script that might look like this:

Public Sub SaveAtt(Mail as Outlook.MailItem)

Dim Att as Outlook.Attachment

If Mail.Attachments.Count Then

Set Att=Mail.Attachments(1)

Att.SaveAsFile "c:\" & Att.Filename

Endif

End Sub

Best regards

Michael Bauer

Am Wed, 7 Apr 2010 12:03:03 -0700 schrieb Joe:


> I need to save an attachment to a specific network drive/folder if an


email
> comes from a specific person. I know som excel vba but nothing in access,
> can u guys help me out?

> Thanks!~
 
J

Joe

Should i set up a specific email and on a application server so that the

account is always logged in and not dependant on someone? How do i deal with

something like that? My comp IT dept isnt handy at all and they are on the

other side of the planet :(

Thank you

"Michael Bauer " wrote:



> You can create a rule in Outlook to run a script that might look like this:

> Public Sub SaveAtt(Mail as Outlook.MailItem)
> Dim Att as Outlook.Attachment
> If Mail.Attachments.Count Then
> Set Att=Mail.Attachments(1)
> Att.SaveAsFile "c:\" & Att.Filename
> Endif
> End Sub

> > Best regards
> Michael Bauer
> Category Manager -

> SAM - The Sending Account Manager:
>

> Am Wed, 7 Apr 2010 12:03:03 -0700 schrieb Joe:
>
> > I need to save an attachment to a specific network drive/folder if an

> email
> > comes from a specific person. I know som excel vba but nothing in access,
> > can u guys help me out?
> > Thanks!~

> .
>
 
J

Joe

I set up a rule to run a script and got a message that it is a client-only

rul and will process only when outlook is running. I used your code and put

it in a module i added in the vba ide under the moduels folder. Please see

my prior post about doing it so that it will always run

"Michael Bauer " wrote:



> You can create a rule in Outlook to run a script that might look like this:

> Public Sub SaveAtt(Mail as Outlook.MailItem)
> Dim Att as Outlook.Attachment
> If Mail.Attachments.Count Then
> Set Att=Mail.Attachments(1)
> Att.SaveAsFile "c:\" & Att.Filename
> Endif
> End Sub

> > Best regards
> Michael Bauer
> Category Manager -

> SAM - The Sending Account Manager:
>

> Am Wed, 7 Apr 2010 12:03:03 -0700 schrieb Joe:
>
> > I need to save an attachment to a specific network drive/folder if an

> email
> > comes from a specific person. I know som excel vba but nothing in access,
> > can u guys help me out?
> > Thanks!~

> .
>
 

Michael Bauer

Senior Member
Outlook version
Outlook 2010 32 bit
Email Account
Exchange Server
The VBA macro can be run only within Outlook, not on the server.

Best regards

Michael Bauer

Am Thu, 8 Apr 2010 05:01:01 -0700 schrieb Joe:


> Should i set up a specific email and on a application server so that the
> account is always logged in and not dependant on someone? How do i deal


with
> something like that? My comp IT dept isnt handy at all and they are on


the
> other side of the planet :(

> Thank you

> "Michael Bauer " wrote:
>
>

>> You can create a rule in Outlook to run a script that might look like


this:
>

>> Public Sub SaveAtt(Mail as Outlook.MailItem)
> > Dim Att as Outlook.Attachment
> > If Mail.Attachments.Count Then
> > Set Att=Mail.Attachments(1)
> > Att.SaveAsFile "c:\" & Att.Filename
> > Endif
> > End Sub
>

>> > > Best regards
> > Michael Bauer
> > Category Manager -

> > SAM - The Sending Account Manager:
> >

>
>
>> Am Wed, 7 Apr 2010 12:03:03 -0700 schrieb Joe:
> >
> >> I need to save an attachment to a specific network drive/folder if an

> > email
> >> comes from a specific person. I know som excel vba but nothing in


access,
> >> can u guys help me out?
> >
>>> Thanks!~

> > .
> >
 
Status
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
9 Outlook 2016 How to save an Outlook attachment to a specific folder then delete the email it came from? Using Outlook 1
V VB script code to save a specific email attachment from a given email Outlook VBA and Custom Forms 14
B VBA Help Email that will save as draft and send as attachment Outlook VBA and Custom Forms 3
G Save attachment run a script rule Outlook VBA and Custom Forms 0
S save attachment with date & time mentioned inside the file Outlook VBA and Custom Forms 0
A Edit attachment Save and Reply Outlook VBA and Custom Forms 0
geofferyh Cannot get Macro to SAVE more than one message attachment??? Outlook VBA and Custom Forms 5
W Save Outlook attachment in network folder and rename to current date and time Outlook VBA and Custom Forms 18
peacepanda How to save attachment looking at the attachment name Outlook VBA and Custom Forms 1
D Automatically save attachment to network folder Exchange Server Administration 1
C How To Open Outlook Attachment in Excel, Modify some Data, then Re-Save It Using Outlook 3
H Save .msg attachment as .rtf Outlook VBA and Custom Forms 10
E Auto Save Zip File Attachment to Network Folder Outlook VBA and Custom Forms 1
S unable to save attachment Outlook VBA and Custom Forms 1
S save attachment using outlook 2007 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
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 8
S Add VBA save code Using Outlook 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
M Outlook 2013 Script Assistance - Save Opened Link with Subject Added Outlook VBA and Custom Forms 1
R Use an ItemAdd to Save Attachments on Arrival Outlook VBA and Custom Forms 0
W Outlook Calendar does not save view any longer! Using Outlook 3
S automate save the .xlxs file to share Network Using Outlook 1
S save email from excel Outlook VBA and Custom Forms 1
Y Open and Save Hyperlink Files in multiple emails Outlook VBA and Custom Forms 9
O Save attachments using hotkey without changing attributes Outlook VBA and Custom Forms 1
N Open & Save VBAProject.Otm using VBA Code Outlook VBA and Custom Forms 1
R VBA | Chosing path to save file Outlook VBA and Custom Forms 1
W Save and rename outlook email attachments to include domain name & date received Outlook VBA and Custom Forms 4
V Change default default save location to Quick Access Using Outlook 1
C Change default "Save Sent Item To" folder Outlook VBA and Custom Forms 9
C Outlook - cannot save subject line changes Using Outlook 2
J Save E-mail attachments in a specific folder Outlook VBA and Custom Forms 0
I Outlook 2016 64bit - on receipt convert emails into PDF and save Outlook VBA and Custom Forms 2
C Auto save outlook attachments when email is received Outlook VBA and Custom Forms 1
N editing drafts - won't let me save Using Outlook 12
nathandavies Email Details to Excel & Save as .MSG on one macro - combination of 2 macros Outlook VBA and Custom Forms 3
C Need VBA code to automatically save message outside outlook and add date Outlook VBA and Custom Forms 1
D Save Sent Item to Using Outlook 0
Diane Poremsky Save Selected Email Message as .msg File Using Outlook 11
Diane Poremsky Export (Save) Outlook Contact photos Using Outlook 0
Diane Poremsky Save Messages and Attachments to a New Folder Using Outlook 0
B Delete/replace old files and save new attachments Using Outlook 1

Similar threads

Top