Status
Not open for further replies.

yuvaraj

New Member
Outlook version
Outlook 2013 64 bit
Email Account
Exchange Server
Hi,

I tried to set a rules in outlook 2013 version, but unfortunately i found the run a script option in the action pane, but while clicking on the script underlined one can't able to find My Macro Name to proceed with the rules. Could you please suggest me what will be the issues in that?

Thanks,
Yuvaraj

Outlook Script Error.png
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
What script are you using? The name line needs to be formatted correctly - with the object in the (), not in a dim statement. (You also won't set the object in the macro - you don't use anything like set item = objApp.ActiveExplorer.Selection.Item(1) - the rule sets the item to the newly arrived item.

Public Sub scriptname (Item As Outlook.MailItem)


 

yuvaraj

New Member
Outlook version
Outlook 2013 64 bit
Email Account
Exchange Server
Thanks for the reply Diane. Below is the script which am trying to execute, please find that and let me know any issues.

Option Explicit
Public Sub Application_NewMail()
Dim olapp As Object
Dim olmapi As Object
Dim olmail As Object
Dim olitem As Object
Dim objMyInbox As Object
Dim lrow As Integer
Dim olattach As Object
Dim str As String
Dim chckSubject As Integer
Dim valSubject As String
Dim olp As Object
Dim i As Integer

Const num As Integer = 6
Const path As String = "XXXXXXXXXX"
Const emailpath As String = "XXXXXXXXXXXX"
Const olFolderInbox As Integer = 6

Set olp = CreateObject("outlook.application")
Set olmapi = olp.GetNamespace("MAPI")
Set olmail = olmapi.GetDefaultFolder(num)
Set objMyInbox = olmapi.GetDefaultFolder(olFolderInbox)


If olmail.Items.Restrict("[UNREAD]=True").Count = 0 Then

MsgBox ("No Unread mails")

Else

For i = 1 To olmail.UnReadItemCount

For Each olitem In olmail.Items.Restrict("[UNREAD]=True")

valSubject = olitem.Subject

If valSubject Like ("*XXXXXXXXXX*") And olitem.Attachments.Count <> 0 Then

For Each olattach In olitem.Attachments

olattach.SaveAsFile path & Format(Date, "MM-dd-yyyy") & olattach.FileName

Next olattach

End If

olitem.UnRead = False
DoEvents
olitem.Save
Next olitem

Next i

End If

End Sub
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Sorry, I didn't get a chance to look at this. This Is not a run a script rule - it applies to new mail: Application_NewMail . What are you trying to do with it ? If you want to save attachments on certain messages as they arrive, see
 
Status
Not open for further replies.
Thread starter Similar threads Forum Replies Date
B Outlook rule run a Script doesn't work Outlook VBA and Custom Forms 1
B Wanting to run a script that will filter any body that has a russian link in it. Outlook VBA and Custom Forms 5
Bri the Tech Guy Registry Tweak to make "Run a Script" Action Available Outlook VBA and Custom Forms 2
Bri the Tech Guy Run Script rule not running for newly arriving messages Outlook VBA and Custom Forms 25
Vijay Error in rule- Run a script Using Outlook 1
Vijay Run script doesn't work in outlook Using Outlook 1
Diane Poremsky Run a Script Rule: Send a New Message when a Message Arrives New Slipstick.com Articles 2
oliv- How to Run a Script IN AN ADDIN with Outlook's Rules and Alerts Outlook VBA and Custom Forms 2
L Run a Script Rule doesn't work Using Outlook 5
X Outlook script to run excel data Outlook VBA and Custom Forms 1
D RUN SCRIPT WHEN OUTLOOK IS CLOSE Outlook VBA and Custom Forms 1
L Cannot run script from rule Outlook VBA and Custom Forms 7
O modify vba to run it as script rule Outlook VBA and Custom Forms 8
P How many subs can run in one outlook VBA script Using Outlook 5
Xueying run a script in rules, first time succeed, failed afterwards Outlook VBA and Custom Forms 3
P Vba script including macro appears in rules but wont run Outlook VBA and Custom Forms 6
Jeff Rott Diane Question on "Use in a Run a Script Rule" Outlook VBA and Custom Forms 1
J Outlook 2007 Rules & VBA: How to run a script on a report message (ReportItem) Using Outlook 14
L Outlook 2007 Macro to Run a Script From a Contact Form Using Outlook 41
E run script fails suddenly Using Outlook 3
L Run A Script not listed in rules wizard Outlook VBA and Custom Forms 12
L Run script rule not exectued for first few mails Outlook VBA and Custom Forms 2
A Run-time error '430' on certain emails when trying to set "Outlook.mailitem" as "ActiveExplorer.Selection.Item" Outlook VBA and Custom Forms 2
S Outlook Custom Form Scripting only working when clicking on "Run this form" Outlook VBA and Custom Forms 2
O Outlook 2016 This rule will only run when you check your email in Outlook.... Using Outlook 4
B run scripts Using Outlook 1
A Run time error 424. object required in outlook 2013 Outlook VBA and Custom Forms 10
Dave A Run macro on existing appointment when it changes Outlook VBA and Custom Forms 1
O Run macro automatically at sending an email Using Outlook 11
P errors appear every time I run SCANPST Using Outlook 3
S VBA Macro - Run-time error '424': object required - Help Please Outlook VBA and Custom Forms 3
P Run Time Error 91 when linking contact to task in VBA Outlook VBA and Custom Forms 1
O Having rules run on old mails noved to inbox Outlook VBA and Custom Forms 8
J Custom form code doesn't run Outlook VBA and Custom Forms 2
J VBA Run When Reply Outlook VBA and Custom Forms 4
O VBA to Run Font Change on Outlook Startup Outlook VBA and Custom Forms 4
D Creating an outlook session from Access vba but run silently. With A specific profile Outlook VBA and Custom Forms 1
Diane Poremsky Using Scanpst in Outlook Click to Run New Slipstick.com Articles 0
B Can't run macro from QAT when emailing from Acrobat Outlook VBA and Custom Forms 0
J Outlook 2010 VBScript editor does not run code at all Outlook VBA and Custom Forms 0
D How to Run a Report Based on Age of Inbox Items Outlook VBA and Custom Forms 0
M Office 365 Click to run BCM (Business Contact Manager) 0
D Must now "View on Facebook" for Mentions/Comments-Outlook 2013 click-to-run Using Outlook 2
R Outlook won't run except in Safe mode problem Using Outlook 5
K Revert AutoArchive settings via GPO (Run Autoarchive every...) Using Outlook 4
G Outlook 2003 VBA Won't Run In Outlook 2010 Outlook VBA and Custom Forms 4
J Run Rules Now Using Outlook 1
Gary Brown Outlook 2013 VBA to run a rule Outlook VBA and Custom Forms 13
T Is the standalone Outlook 2013 click-to-run or msi? Using Outlook 1
A Uninstall Click and Run Exchange Server Administration 2
Similar threads


















































Top