Hi, I have hundreds of emails with zip folders attached. I need to automate the unzipping and then download all the pdf files from the folder. Is it possible?
Very helpful video. i used the code it works but i come across a problem: just last 15 email attachments were downloaded but i had 100 emails. What should i do here? Any recommendations?
Dear PK I am getting Type Mismatch 13 error on the line: For Each msg In fo.Items I am using the file you've uploaded. I have the Outlook Library referenced. I am using o365. Can you please advise? Thanks in advance!
Hello, thank you very much for this tool! I 'm trying to download all attachments from my gmail account in outlook, however I have the following error: Run time error '13': Type mismatch and on debugging mode, I have "next" which is highlighted
Hello, I used this process in downloading multiple pdfs and it worked smoothly. One question, When creating those columns in the Sheet1, could I add another column to display the actual email addresses that sent those attachments?
Thanks a lot for providing valuable info. But am facing one issue like in mail folder i have 30 files, but its downloading less than that count. Can you give solution for this please
the script is works but having a problem on my attachment download as it only gives me a 1download file of result only as the file was over write when it starts to download the file. What should be the script to just not overwrite the downloaded file if the file name is already exists?
Best content i have ever watched on yt Thank you so much Sir for sharing Ps. Kindly show also how to extract FILENAME of attachment at column C Many thanks 🙏
Hello sir .. i have 150 emails in which pdf is attached.... By running this macro i am able to download only 70-80 files.... Not total 150.... Please help
Thanks a lot! But there is one more question, if multiple attachments have the same name, it will only download one (others will be replaced by the last one I guess), is there a solution for that? Thanks again!
I have a mail folder which contains a few hundred emails with a single attachment each, the issue is that all the attachments have the same name "scanned doc.pdf", so only one file gets downloaded to my folder, is there some code I can add to save them all with a number, 1, 2, 3 etc etc added to the file name?
Thanks PK. I have a question: All of the attachments included in the emails all have the same name. Is there something I can write that will save each file under a new version name? Thanks again
I added the received datetime as a suffix to the attachment filename by changing the save command to: at.SaveAsFile sh.Range("F1").Value & "\" & fso.GetBaseName(at.Filename) & "-" & Format(msg.ReceivedTime, "yyyymmddHHmmss") & "." & fso.GetExtensionName(at.Filename)
@@stevenbergstein7277 hello man could you please explain me if I have to define the variable "fso" at the begining of the VBA script? I'm not expert un macros and these área My first self efforts to write script. Thanks! If you can share your code it will be helpful thanks .
@@Santiago3_18 Yes, you have to define fso at the beginning of the script like this: Dim fso As New Scripting.FileSystemObject You'll also need to use Tools/References to enable Microsoft Scripting Runtime. fso is a VBA object that gives the script access to a number of file system methods, in this case, methods that help to parse various components of the file location.
I have an error in sh.Range("A" & 1r + 1).Value = msg.Attachments.Count The VBA says Compile error: Expected list separator or ) Any idea what should I do?
This amazing! I’m getting a 438 error “object doesn’t support this property or method” for lr = Application.WorksheetFunction.CountA(sh.Range(“A:A”)) Any ideas what’s wrong?
Thank you PK very much, it didn't work for me, after downloading the first 40 labels (no attachments were downloaded) it spin then raise runtime error 13 type mismatch, highlighting the second Next in the VBA code, can you help me? my email is 1400 emails to download heir attachments thank you.
Hello, thank you, it's very helpful. I applied all what you have described in the video but when I hit download all the numbers show in the excel sheet but nothing was saved in the folder, how can I fix this issue.
Please if you a solution on attachment that a same name then different file content.. I already used the code but the problem is the thing that I mentioned its override the existing file. Thank you so much
It does work when I finish writing the program for the first time on excel but when I close everything then want to download the files again, it doesn't work!!! Why is that ?
You are the best. You are too good man. Can you also suggest how to download files of different kinds e.g. PDF, doc, and docx at the same time? Is it possible?
Thanks! Can it create folders based on email subject and then save respective attachments in the respective subject folders. That will be great. Thanks!
Hi, If an attachment has the same name as in the pervious email, it saves the latest file. Could you help how to address this problem. I need to save all the attachments irrespective.
I tried this over and over and it's not working. The first line Sub Download_Attachments() is highlit in yellow and when I click "Run Macro", nothing happens. Please help
All of the attachments included in the emails all have the same name. Is there something I can write that will save each file under a new version name?
dear sir, this is an excellent solution, yet what if the mailbox is on office 365 cloud ? looks loike MAPI is not working right, or maybe something else, anyways it give an error on the "set fo" line tks
Truley excellent PK...... So much helpfull One question...if i have 100 mails in my inbox and i want to download the attachment from the top 10 or top 20 or any other counts Then what will be the change in vba code????
Hi, Thank you for this code. when I am using this code and after a few minute my outlook getting crash. I am using outlook 2016. I have some 400 emails in my account . some attachment got saved also but not all. Any solution?
Hi PK you are sharing wonderful videos, this is perhaps one of the best solutions, however can you please provide the same in Lotus Notes if possible...
Is it possible that you make another video on how to do the same operation but for a specific period of time like for example I want to download all the attachements from date 1 to date 13 only
It is a life saver. Thank you so much.
Most welcome🙏
Extremely helpful. 2 hours of coding saved me about a day of labor. My first VB script!
Thanks for your valuable feedback
My compliments. I followed your instructions manually without downloading your file and the macro worked perfectly. Thank you.
No body can beat you sir
Thanks
Hi, I have hundreds of emails with zip folders attached. I need to automate the unzipping and then download all the pdf files from the folder. Is it possible?
Thank you so much it saves a lot of time
Most welcome
PK Sir, Awesome, Folder may have many emails, can we give a date range between them VBA should check and download the attchments
Awesome, will help me sort out the attachments easily now
Thanks for your valuable feedback
Thank you, love u bhai.
Ur works are so helpful for us.
Thanks for your valuable feedback
Very helpful video. i used the code it works but i come across a problem: just last 15 email attachments were downloaded but i had 100 emails. What should i do here? Any recommendations?
Dear PK
I am getting Type Mismatch 13 error on the line: For Each msg In fo.Items
I am using the file you've uploaded. I have the Outlook Library referenced.
I am using o365. Can you please advise? Thanks in advance!
Hello,
thank you very much for this tool!
I 'm trying to download all attachments from my gmail account in outlook, however I have the following error:
Run time error '13': Type mismatch and on debugging mode, I have "next" which is highlighted
Thank you very much. This works for me.
Thanks for your valuable feedback
Thanks. This was great - saved me a bunch of dev time.
Thanks for your valuable feedback
Thanks PK, saved me lots of work
Thanks for your valuable feedback
Thanks for the such videos, can you please help me on that If the attached file name is same then how we saved the all the attached files.
Thank you sir!
You are welcome!
Very good vedio, i have created macro for my use. thanks a lot PK.
Thanks for your valuable feedback
Thank you sir! This helps a lot.
Glad it helped!
As usual , you are amazing
Thanks for your valuable feedback
I would like to give you 1milion like for this video thanks a lot bro
Thanks for your valuable feedback
Thank you very much PK, you are the BEST!!!!!
Long search ended now. Thanks
Thanks for your valuable feedback
Hatts off you sir
Thanks
Hello, I used this process in downloading multiple pdfs and it worked smoothly. One question, When creating those columns in the Sheet1, could I add another column to display the actual email addresses that sent those attachments?
It works on the Outlook 365.
Thank you so much for this.
This is very helpful :)
Thanks for your valuable feedback
Thanks a lot for providing valuable info. But am facing one issue like in mail folder i have 30 files, but its downloading less than that count. Can you give solution for this please
Do we have the option to download attachments from specific person with specific subject? Thanks in advance.
the script is works but having a problem on my attachment download as it only gives me a 1download file of result only as the file was over write when it starts to download the file. What should be the script to just not overwrite the downloaded file if the file name is already exists?
Best content i have ever watched on yt
Thank you so much Sir for sharing
Ps. Kindly show also how to extract FILENAME of attachment at column C
Many thanks 🙏
Will upload soon
@@PKAnExcelExpert Thank you so much Sir 👍
Really thanks
Most welcome🙏
Thanks you brother
Brother I wanna save those attachment by subject name than... Plz reply
Hello sir .. i have 150 emails in which pdf is attached.... By running this macro i am able to download only 70-80 files.... Not total 150.... Please help
Thanks so much. This has really helped me
Thanks for your valuable feedback
Thanks a lot! But there is one more question, if multiple attachments have the same name, it will only download one (others will be replaced by the last one I guess), is there a solution for that? Thanks again!
Ye HUANG did you find any solution to your questions currently I hace this issue please help if you find the solution...regards
same issue to me. Can anyone share your solutions on this on how not to overwrite the file. My brain is draining thingking of way how to do it...
Awesome video and many thanks for sharing this... Saved me big time :)
Thanks for your valuable feedback
I have a mail folder which contains a few hundred emails with a single attachment each, the issue is that all the attachments have the same name "scanned doc.pdf", so only one file gets downloaded to my folder, is there some code I can add to save them all with a number, 1, 2, 3 etc etc added to the file name?
Thanks PK. I have a question:
All of the attachments included in the emails all have the same name. Is there something I can write that will save each file under a new version name? Thanks again
I added the received datetime as a suffix to the attachment filename by changing the save command to:
at.SaveAsFile sh.Range("F1").Value & "\" & fso.GetBaseName(at.Filename) & "-" & Format(msg.ReceivedTime, "yyyymmddHHmmss") & "." & fso.GetExtensionName(at.Filename)
@@stevenbergstein7277 hello man could you please explain me if I have to define the variable "fso" at the begining of the VBA script? I'm not expert un macros and these área My first self efforts to write script. Thanks! If you can share your code it will be helpful thanks .
@@Santiago3_18 Yes, you have to define fso at the beginning of the script like this: Dim fso As New Scripting.FileSystemObject
You'll also need to use Tools/References to enable Microsoft Scripting Runtime.
fso is a VBA object that gives the script access to a number of file system methods, in this case, methods that help to parse various components of the file location.
@@stevenbergstein7277 thanks for tour time to explain me this I will try yo work on the script, thanks.
Yeeessss I got ir, really really thanks man! God bless you!
I have an error in sh.Range("A" & 1r + 1).Value = msg.Attachments.Count
The VBA says
Compile error:
Expected list separator or )
Any idea what should I do?
This amazing! I’m getting a 438 error “object doesn’t support this property or method” for lr = Application.WorksheetFunction.CountA(sh.Range(“A:A”))
Any ideas what’s wrong?
Thank you PK very much, it didn't work for me, after downloading the first 40 labels (no attachments were downloaded) it spin then raise runtime error 13 type mismatch, highlighting the second Next in the VBA code, can you help me? my email is 1400 emails to download heir attachments thank you.
Hi Friend. Thanks a lot.
Kindly let us if we want to download both pdf and xls format
Please make the changes in the if condition in the VBA code accordingly.
Can i rename the attachment with the mail id that it comes from to the outlook?
Amazing my friend.
Worked perfectly.
Thanks for your valuable feedback
Thanks alot bro,
Its working ☺️
Thanks for watching
Thank you Pk. You are the best. Can we have file name instead of Attachment count ?
Thanks for your valuable feedback. Yes we can have it. Need to make some changes in the code
Hello, thank you, it's very helpful. I applied all what you have described in the video but when I hit download all the numbers show in the excel sheet but nothing was saved in the folder, how can I fix this issue.
Check the folder path or just copy the folder path and paste
Really great help!!!. Thank you so much :)
Thanks for your valuable feedback
This is a very smart solution and works as a charm for me. I'm only trying to add the filename in a 3rd column, but I can't get it to work.
Hi PK, how can i save the attachments with teh sender email address in the name+the actual name of the file?
Please if you a solution on attachment that a same name then different file content.. I already used the code but the problem is the thing that I mentioned its override the existing file.
Thank you so much
hi this is really help full... could you please advise me how i can add multiple format attachment like pdf... thanks
It does work when I finish writing the program for the first time on excel but when I close everything then want to download the files again, it doesn't work!!! Why is that ?
Hi may I seek your advice how to save my attachment as email subject name?
If same day same attachment received by difference msg = how it react
You are the best. You are too good man. Can you also suggest how to download files of different kinds e.g. PDF, doc, and docx at the same time? Is it possible?
Dear, is there any code to download attached emails only with particular date ? instead of all
Thanks! Can it create folders based on email subject and then save respective attachments in the respective subject folders. That will be great. Thanks!
Thank you PK, It's really great. Can you please tell me how can I exclude Fwd and Re mails attachment.
If duplicate PDF is there in email then it is downloading only one PDF please suggest
Great video!
Thanks for your valuable feedback
what do I have to do if I want to search for at.Filename; "PDF" and "jpg" and save both?
You can use "OR" in the if condition with these extensions
Is it possible to download the PDF embedded in hyperlink? i m not able to save the files from hyperlink..Thanks in Advance
Hi Pk, quick question, how do I write the name of the file in the cells: sh.Range("A" & lr + 1).Value = at.filename is not working. thanks
I found it: sh.Range("A" & lr + 1).Value = at.DisplayName ..
Hi, If an attachment has the same name as in the pervious email, it saves the latest file. Could you help how to address this problem. I need to save all the attachments irrespective.
Hi, can you help?
Hi Brother, Thanks for this wonderful Video. Can you please confirm how to Add file name for the attachments? Please confirm the coding?
I will try to add this in the next version of this video
I tried this over and over and it's not working. The first line Sub Download_Attachments() is highlit in yellow and when I click "Run Macro", nothing happens. Please help
Hello Priyendra Kumar,
Can I include the Receipt date and from address to the Macros, please help
All of the attachments included in the emails all have the same name. Is there something I can write that will save each file under a new version name?
Hi Sir, it was very helpful. How can I download the attachment only for today?
we can put the If condition to check the mail date
@@PKAnExcelExpert can you give me more detail of how to write this kind of condition? and where in your vbs? Thank you so much!
Can this tool work too if you have multiple mailbox in an outlook?
I have tried but something seems wrong
I tried but it only save one attachment though everything is in pdf file format. please help.
Thanks boss
Thanks for watching
Plz suggest for command for any file attachment t
Sir,please tell how to download attachments automatically from gmail using subject of mails
Can we add a date format where we can only update the yesterday file??
Brilliant!
Thanks for your valuable feedback
Sir could you help me to login automatically in outlook account, and write a full code pls.
Unable to download all attachment.
Getting only 10 attachments
I have pdf file coming every day in 50 email and all email have 1 attachment how can I do pdf
dear sir, this is an excellent solution, yet what if the mailbox is on office 365 cloud ? looks loike MAPI is not working right, or maybe something else, anyways it give an error on the "set fo" line
tks
Go back to tools, then click on References and click on Microsoft Outlook OWA, make sure that's checked and it worked for me.
Sir, excel 2010 version is this applicable or not
Truley excellent PK......
So much helpfull
One question...if i have 100 mails in my inbox and i want to download the attachment from the top 10 or top 20 or any other counts
Then what will be the change in vba code????
Hi Pawan,
In place of for each loop use only for loop to do that
Kya yr Gmail pey work karega?
Hi, Thank you for this code. when I am using this code and after a few minute my outlook getting crash. I am using outlook 2016.
I have some 400 emails in my account . some attachment got saved also but not all. Any solution?
Hi PK you are sharing wonderful videos, this is perhaps one of the best solutions, however can you please provide the same in Lotus Notes if possible...
Getting syntax error for set to line..plzz help
Hi .. is this not works once mail is connected with VPN
Hi Sir i want to download a file from a specific subject line
will consider this in next version of this tool
Could you please advise why .PDF is not downloading instead of using .pdf attachments
Is there any way of downloading only the attachment from the Unread emails?
Yes it can be. We have to a condition. I will definitely try to make such video very soon
PK: An Excel Expert that will be awesome! Thanks. I appreciate it
If you are using outlook, I would suggest using OutlookAttachmentReader . This would help you in downloading attachments from unread emails
Awesome
Thanks for your valuable feedback
What about redundancy
It is helpful but i am only able to download excel files... Not PDF... Please help
Need to change the code accordingly.
@@PKAnExcelExpert yeah now it worked... Thanks a lot
How to get attachment with particular mail account
Will it work for pdf copies too
Yes
So, how do I download attachments from different emails at once on Gmail?
will create a video on this topic
Can anyone help me i need to know is there any way to make excel rows unlimited....
Is it possible that you make another video on how to do the same operation but for a specific period of time like for example I want to download all the attachements from date 1 to date 13 only
Hello sir
I tried the same but the error says object couldn't be found
Can you help me with the line the below
Set fo = outlook
I copied the same line