Objet ScopeFolder (Office)
Correspond à un dossier de recherche. Les objets ScopeFolder sont destinés à être utilisés avec la collection SearchFolders .
Remarques
Lorsque vous souhaitez rechercher des dossiers spécifiques, vous pouvez utiliser les méthodes et les propriétés de l’objet SearchScope et de la collection ScopeFolders pour récupérer des objets ScopeFolder et les ajouter à la collection SearchFolders .
Dans chaque objet ScopeFolder , il existe une collection ScopeFolders qui contient les sous-dossiers de l’objet ScopeFolder parent. Vous pouvez parcourir l’ensemble de la structure de dossiers d’une étendue de recherche (par exemple, tous les lecteurs locaux) en effectuant une boucle dans ces collections ScopeFolders et en retournant tous les objets ScopeFolder de niveau inférieur. Un objet ScopeFolder sans sous-dossier contient une collection ScopeFolders vide.
Pour obtenir un exemple qui montre comment parcourir en boucle tous les objets ScopeFolder dans une étendue de recherche, consultez la rubrique relative à la collection SearchFolders .
Utilisez la méthode Add de la collection SearchFolders pour ajouter un objet ScopeFolder à la collection SearchFolders . Toutefois, il est généralement plus simple d’utiliser la méthode AddToSearchFolders du ScopeFolder que vous souhaitez ajouter, car il n’existe qu’une seule collection SearchFolders pour toutes les recherches.
Pour obtenir un exemple qui montre comment ajouter un ScopeFolder à la collection SearchFolders , consultez la rubrique collection SearchFolders .
Exemple
Utilisez la propriété ScopeFolder de l’objet SearchScope pour renvoyer l’objet ScopeFolder racine d’une étendue de recherche ; par exemple :
Set sf = SearchScopes.Item(1).ScopeFolder
Utilisez la propriété Item de la collection ScopeFolders pour renvoyer un sous-dossier d’un objet ScopeFolder racine ; par exemple :
Set sf = SearchScopes.Item(1).ScopeFolder.ScopeFolders.Item(1)
L’exemple suivant montre comment afficher le chemin d’accès racine de chaque répertoire du poste de travail. Pour récupérer ces informations, l’exemple obtient d’abord l’objet ScopeFolder à la racine du Poste de travail. Le chemin de cet objet ScopeFolder sera toujours « * ». Comme avec tous les objets ScopeFolder , l’objet racine contient une collection ScopeFolders . Cet exemple montre comment parcourir cette collection ScopeFolders et afficher le chemin d’accès de chaque objet ScopeFolder qu’elle contient. Les chemins de ces objets ScopeFolder seront 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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.