Objeto ScopeFolder (Office)

Corresponde a uma pasta pesquisável. Os objetos ScopeFolder são destinados para uso com a coleção SearchFolders .

Comentários

Quando quiser pesquisar pastas específicas, você pode usar os métodos e as propriedades do objeto SearchScope e da coleção ScopeFolders para recuperar objetos ScopeFolder e adicioná-los à coleção SearchFolders .

Em cada objeto ScopeFolder , há uma coleção ScopeFolders que contém as subpastas do objeto ScopeFolder pai. Você pode percorrer toda a estrutura de pasta de um escopo de pesquisa (por exemplo, todas as unidades locais) fazendo loop por meio dessas coleções ScopeFolders e retornando todos os objetos ScopeFolder de nível inferior. Um objeto ScopeFolder sem subpastas contém uma coleção ScopeFolders vazia.

Para obter um exemplo que demonstre como fazer loop em todos os objetos ScopeFolder em um escopo de pesquisa, consulte o tópico da coleção SearchFolders .

Use o método Add da coleção SearchFolders para adicionar um objeto ScopeFolder à coleção SearchFolders ; no entanto, geralmente é mais simples usar o método AddToSearchFolders do ScopeFolder que você deseja adicionar porque há apenas uma coleção SearchFolders para todas as pesquisas.

Para obter um exemplo que demonstre como adicionar um ScopeFolder à coleção SearchFolders , consulte o tópico da coleção SearchFolders .

Exemplo

Use a propriedade ScopeFolder do objeto SearchScope para retornar o objeto ScopeFolder raiz de um escopo de pesquisa; por exemplo:

Set sf = SearchScopes.Item(1).ScopeFolder

Use a propriedade Item da coleção ScopeFolders para retornar uma subpasta de um objeto ScopeFolder raiz; por exemplo:

Set sf = SearchScopes.Item(1).ScopeFolder.ScopeFolders.Item(1)

O exemplo a seguir exibe o caminho raiz de cada diretório no Meu Computador. Para recuperar essas informações, o exemplo primeiro obtém o objeto ScopeFolder na raiz do Meu Computador. O caminho desse objeto ScopeFolder sempre será "*". Assim como acontece com todos os objetos ScopeFolder , o objeto raiz contém uma coleção ScopeFolders . Este exemplo percorre esta coleção ScopeFolders e exibe o caminho de cada objeto ScopeFolder nele. Os caminhos desses objetos ScopeFolder serão A:\, C:\etc.

Sub DisplayRootScopeFolders() 
 
 'Declare variables that reference a 
 'SearchScope and a ScopeFolder object. 
 Dim ss As SearchScope 
 Dim sf As ScopeFolder 
 
 'Loop through the SearchScopes collection 
 'and display all of the root ScopeFolders collections in 
 'the My Computer scope. 
 For Each ss In SearchScopes 
 Select Case ss.Type 
 Case msoSearchInMyComputer 
 
 'Loop through each ScopeFolder object in 
 'the ScopeFolders collection of the 
 'SearchScope object and display the path. 
 For Each sf In ss.ScopeFolder.ScopeFolders 
 MsgBox "ScopeFolder object's path: " & sf.Path 
 Next sf 
 
 Case Else 
 End Select 
 Next 
 
End Sub

Confira também

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.