Advanced search for subject incurs error 438 - object doesn't support this properties or method

Question

I would like to search for email with subject "order 14567" in my current Outlook folder.

There is an error (438 - object doesn't support this properties or method.) incurred in the following code:

Set objSch = Application.AdvancedSearch(scope:=strS, _
            Filter:=strF, Tag:=strTag)   

VBA code:

Sub SearchInboxFolder()
'Searches the Inbox
    Dim objSch As Search
    Const strF As String = "urn:schemas:mailheader:subject = 'order 14567'"
    Const strS As String = "Inbox"
    Const strTag As String = "SubjectSearch"
    Set objSch = Application.AdvancedSearch(scope:=strS, _
        Filter:=strF, Tag:=strTag)
End Sub

Answer 1

It looks like the IsInstantSearchEnabled property of the Store returns false, i.e. the instant search is turned off for the store. In that case you need to use the search string like the following one:

"urn:schemas:mailheader:subject like '%order 14567%'"

You can read about filtering strings in the Filtering Items Using Query Keywords section in MSDN.

Also you may find the Find/FindNext or Restrict methods of the Items class helpful. They are described in depth in the following articles:

• Advanced search in Outlook programmatically: C#, VB.NET
• How To: Use Find and FindNext methods to retrieve Outlook mail items from a folder (C#, VB.NET)
• How To: Use Restrict method to retrieve Outlook mail items from a folder