View Single Post
  #3  
Old March 20th 10, 10:21 AM posted to microsoft.public.outlook.program_vba
DLGolfs
external usenet poster
 
Posts: 25
Default How do I run a rule by using a toolbar icon?

No error just highlights the the line
Yes, the rul Delete Spam does exisit, I can run it manually all the time.

I tried to export the rules and put the file here but it did not work.
I have the rule name Delete Spam

"Michael Bauer [MVP - Outlook]" wrote:



What does the error message say? I guess the rule "Delete Spam" doesn't
exist.

--
Best regards
Michael Bauer - MVP Outlook
Manage and share your categories:
http://www.vboffice.net/product.html?lang=en


Am Thu, 18 Mar 2010 17:48:01 -0700 schrieb DLGolfs:

I have Outlook 2007 and have a rule set up to delte spam by detecting

certain
words in the spam.
Here is what someone gave me but it does not work:

Sub RunRuleDeleteSpam()
Dim oNS As Outlook.NameSpace
Dim oStore As Outlook.Store
Dim colRules As Outlook.Rules
Dim oRule as Outlook.Rule

Set oNS = Application.GetNameSpace("MAPI")
Set oStore = oNS.DefaultStore
Set colRules = oStore.Rules
Set oRule = colRules.Item("Delete Spam")
oRule.Execute
End Sub
If I run it it highlights the set oRule line and stops, I guess. I know
nothing about programming, I'll admit, but am not ignorant on computer
processes. I thought if I could make a macro to run a rule then I could

put
the macro in a toolbar icon and just click on it instead of having to go
through a series of clicks.
What do you think? Is the formula wrong or what?

.

Ads