Save attachment of first email only

[griz]

Hi,

How can I save an attachment of the first mail item that has an attachment in the Inbox folder in Outlook 2002 by using VBA?

If there are other mail with attachment I want to leave them. I only want to save the attachment of the first mail item in the list that has an attachment. I also have mail without attachment, which I want to leave it there.

Example:

Mail_A name_A
Mail_B name_B + attachment1
Mail_C name_C
Mail_D name_D + attachment2

So in this case I only want to save attachment 1 (of Mail_B) and delete Mail_B from the list, then close outlook.
How can I do this?

Thanks in advance for your help

 

[_Jack]

what would be the appliation of this functionality?

 

[griz]

I don't think I have understood your question. What do you mean? My aim is to save the attachments one by one, not all at the same time. So I save the first attachment in the list and delete the mail item fron inbox. When I run the macro again it does the same thing for the first item in the list in inbox...