Yes, you can use the LIKE predicate, but only with the AdvancedSearch object,
not the Restrict method.
Here's a sample from the Outook VBA Reference:
Public blnSearchComp As Boolean
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
MsgBox "The AdvancedSearchComplete Event fired"
blnSearchComp = True
End Sub
Sub TestAdvancedSearchComplete()
Dim sch As Outlook.Search
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF As String = "urn:schemas:httpmail:subject LIKE '%mykeyword%'"
Const strS As String = "Inbox"
Set sch = Application.AdvancedSearch(strS, strF)
While blnSearchComp = False
DoEvents
Wend
Set rsts = sch.Results
For i = 1 To rsts.Count
MsgBox rsts.Item(i).SenderName
Next
End Sub
--
Eric Legault (Outlook MVP, MCDBA, MCTS: Messaging & Collaboration)
Try Picture Attachments Wizard for Outlook:
http://www.collaborativeinnovations.ca
Blog:
http://blogs.officezealot.com/legault/
" wrote:
Hello,
I am trying to figure out the following.
Is it possible to do a dynamic search on a subject line?
This is the subject line:
Dictation Job 09121-006, John Doe (TMALA), Acct 3235555555,filename:
GR169-477
Can I do something like:
myItems.Find("[Subject] = 'Dictation Job *, * *, Acct *,filename: * ")
We are using Outlook 2000
I'm very new to VBA.
any help will be appreciated.
Thanks.