|VBOffice Reporter is an easy to use tool for data analysis and reporting in Outlook. A single click, for instance, allows you to see the number of hours planned for meetings the next month.
If you delete an IMAP message, it will be flagged deleted but stays in the folder. For really deleting it, you must do another click to purge the message. This macro does the purging for you. It works for up to Outlook 2010.
'Delete all flagged messages from the current folder
Delete all flagged messages from the current account
Delete all flagged messages from all accounts
Private Sub PurgeDeletedMessages(ByVal Id As Long)
On Error Resume Next
Dim Bars As Office.CommandBars
Dim Btn As Office.CommandBarButton
Set Bars = Application.ActiveExplorer.CommandBars
Set Btn = Bars.FindControl(, Id)
If Not Btn Is Nothing Then