Propiedad Search.SearchSubFolders (Outlook)
Devuelve un valor Boolean que indica si el ámbito de la búsqueda especificada incluye las subcarpetas de las carpetas examinadas. Solo lectura.
Sintaxis
expresión. SearchSubFolders
Expresión Variable que representa un objeto Search .
Comentarios
Esta propiedad viene determinada por el argumento SearchSubfolders del método AdvancedSearch y se especifica cuando se inicia la búsqueda. Si es True, la búsqueda de objetos búsquedas a través de todas las subcarpetas de la ruta de acceso del filtro especificado.
Ejemplo:
El siguiente ejemplo de Microsoft Visual Basic para aplicaciones (VBA) se crea un objeto Search. Bandeja de entrada del usuario se especifica como el ámbito de la búsqueda y la propiedad SearchSubFolders se establece en True. La subrutina del evento se desencadena cuando finaliza la búsqueda y muestra las propiedades Tag y Scope para el nuevo objeto, así como los resultados de la búsqueda.
Public blnSearchComp As Boolean
Private Sub Application_AdvancedSearchComplete(ByVal SearchObject As Search)
MsgBox "The AdvancedSearchComplete Event fired for " & SearchObject.Tag & _
" and the scope was " & SearchObject.Scope
blnSearchComp = True
End Sub
Sub TestAdvancedSearchComplete()
'List all items in the Inbox that do NOT have a flag:
Dim objSch As Outlook.Search
Const strF As String = "urn:schemas:httpmail:messageflag IS NULL"
Const strS As String = "Inbox"
Dim rsts As Outlook.Results
Dim i As Integer
blnSearchComp = False
Const strF1 As String = "urn:schemas:mailheader:subject = 'Test'"
Const strS1 As String = "Inbox"
Set objSch = _
Application.AdvancedSearch(Scope:=strS1, Filter:=strF1, _
SearchSubFolders:=True, Tag:="FlagSearch")
While blnSearchComp = False
DoEvents
Wend
Set rsts = objSch.Results
For i = 1 To rsts.Count
MsgBox rsts.Item(i).SenderName
Next
End Sub
Consulte también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.