Recent content by Rowdy

I fixed the problem, had part of the if then statement out of the loop. THANKS SO MUCH!

Upon swapping those lines I get a compile error: Next without For. Sub AddFileNumber() Dim myolApp As Outlook.Application Dim aItem As Object Set myolApp = CreateObject("Outlook.Application") Set mail = myolApp.ActiveExplorer.CurrentFolder Dim iItemsUpdated As Integer Dim strTemp As String...

Sub AddFileNumber() Dim myolApp As Outlook.Application Dim aItem As Object Set myolApp = CreateObject("Outlook.Application") Set mail = myolApp.ActiveExplorer.CurrentFolder Dim iItemsUpdated As Integer Dim strTemp As String iItemsUpdated = 0 If InStr(1, aItem.Subject, "[Spam]:") > 0 Then For...

Now I'm getting Runtime Error 91 with: If InStr(1, aItem.Subject, "[Spam]:") > 0 Then

Macro keeps giving me a compile error with every line.

Ok, I managed to finish moving all messages to the IMAP account, but now think I messed up the .pst file when I was trying to change the name of the email account because it had a (1) in it so now outlook just freezes everytime I open it. I'm going to try to go into safe mode to rename it back...

Hi, I recently set up aol account with Outlook and by accident set it for POP3 so it deleted all 24000 emails on the server and downloaded to my computer. I tried to change it to IMAP but it doesn't let me, so I created a new IMAP account and have been dragging all the emails to the new...