#1
|
|||
|
|||
Unexpected Macro Behavior
I am running Outlook 2013 in Office 2013 Pro in Windows 10. Everything is fully patched and up to date.
I have written a macro to empty my Trash folder when I quit Outlook. I also put an icon on my QAT to run the macro on demand. The macro runs in both cases, but it only deletes half of the items in the Trash Folder. If I run it a 2nd time on demand it deletes half the remaining items. The macro loops through the items in the folder using a For Each ... Next construct. What am I doing wrong? Below is just the For Each loop of the macro, not the entire macro. For Each myItem In myTrash myItem.Delete Next myItem Let me know if I need to post the entire macro. Any help will be appreciated! |
#2
|
||||
|
||||
Run the loop in reverse so as not to screw up the count
Code:
For i = myTrash.Items.Count to 1 step -1 myTrash.Items(i).Delete Next i
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
#3
|
|||
|
|||
Thanks, gmayor! I had to make a minor change to get it to work for me, but you put me on the right track with the reverse loop. Below is the loop with the change I had to make since variable myTrash was already defined as the collection of items in the folder.
For i = myTrash.Count To 1 Step -1 myTrash(i).Delete Next I Thanks again! This item is solved. |
Tags |
2013, macro, trash |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Strange macro behavior in 2016 | Ulodesk | Word VBA | 5 | 04-02-2017 03:34 PM |
Unexpected formatting issue | kcvinu | Word | 6 | 03-29-2017 02:26 PM |
unexpected Roman numbering in ToC | eNGiNe | Word | 3 | 08-09-2016 11:13 PM |
Unexpected behavior of actual finish | patrickd123 | Project | 3 | 07-23-2014 01:53 PM |
Unexpected Server Response | GreenAccord | Project | 0 | 01-31-2006 12:52 PM |