Recent content by soadfan

saveFolder = "D:\Desktop\TMP\" RSubject = Replace(itm.Subject, ":", "_") RSubject = Replace(RSubject, ",", "_") RSubject = Replace(RSubject, "/", "_") RSubject = Replace(RSubject, "\", "_") MkDir saveFolder I meant windows directory, not Outlook. If i remember correctly it was such a pain in...

Yep no errors. Actually it worked few times. But other macros are stopping because of an error (like trying to create folder that already exist). I'm starting to think that may be the problem is in the VBA handler. This is company laptop, part of domain with a lot of restrictions

Nope. The last one is checked "Break on Unhandled Errors". Should i check the first one? P.S. About the new line, try shift + enter

Nope. It doesn't work. Strange thing. Macros are enabled in security settings

Strange. Now it doesn't fire at application startup. If i run it from VBA editor, works fine even offline.

Yes i am. And it's set to keep all mail.

Nope. It doesn't put it in the outbox at all.

I have this code, which is working fine, except if you don't have internet connection. The problem is that Outlook doesn't send it when internet connection is back. It doesn't appear in the Outbox folder either So is there a way to send it automatically later? Private Sub...

Probably Samsung's. First thing i did when bought my GT-i9505 (Galaxy S4) was to root it and install some custom ROM (cyanogen/lineage). All bloatware was gone, but also preinstalled apps, which forced me to use 3rd parties apps. I'm using aquamail as mail app, for example, and it's better then...

yep:

its on top and i disabled stop disabling more rules on all rules. And it was single mail when failed

I did notice that it won't work for some emails (with attachments mostly) when they arrive. But after that if i run rule manually it assign category, any ideas?

Is this folder appear on all devices or only on desktop PC?

After quick research i came up with this (im not sure it's most elegant/optimized way): Public Sub DateBasedCategories(itm As Outlook.MailItem) Dim dateFormat dateFormat = Format(itm.ReceivedTime, "dd") If dateFormat Mod 2 = 1 Then itm.Categories = "date.odd" itm.Save Else itm.Categories =...

How can i assign category on incoming emails based on received date? For example odd dates> blue, even > red