Classe Research - service de recherche (Word VBA)
Fournit l'accès à la fonctionnalité de service de recherche de Microsoft Word. Pour utiliser une variable de classe Research, elle doit d'abord être instanciée, par exemple
Dim rsr as Research
Set rsr = ActiveDocument.Research
FavoriteService
Cette propriété renvoie ou définit une chaîne qui spécifie le service de recherche favori.
La valeur de type String qui est définie ou renvoyée pour cette propriété spécifie le GUID du service de recherche favori. Définir cette propriété équivaut à choisir un service de recherche favori dans la boîte de dialogue Options de recherche de Word.
Dim objResearch As Research
Sub MyFunction()
Set objResearch = Research
'Set the favorite service
objResearch.FavoriteService = "FEF89077-4F4D-4803-A8BF-228083F70EAA"
End Sub
IsResearchService
Indique si le GUID spécifié dans le paramètre ServiceID correspond à un service actuellement configuré.
IsResearchService (ServiceID)
ServiceID: Spécifie un GUID qui identifie le service de recherche.
Dim strServiceID As String: strServiceID =
Dim booIsResearchService As Boolean
booIsResearchService = ActiveDocument.Research.IsResearchService(ServiceID:=strServiceID)
Query
Spécifie une requête de recherche.
Query (ServiceID, QueryString, QueryLanguage, UseSelection, LaunchQuery)
Dim strServiceID As String: strServiceID =
Dim varQuery As Variant
varQuery = ActiveDocument.Research.Query(ServiceID:=strServiceID)
Arguments
Un argument nommé
ServiceID (String) - Spécifie un GUID qui identifie le service de recherche.
Optional arguments
Les arguments suivants sont facultatifs
QueryString (String) - Spécifie la chaîne de requête.
QueryLanguage (WdLanguageID) - Spécifie la langue de requête pour la chaîne de requête.
Ici on trouve valeurs possible pour
UseSelection (Boolean) - True pour utiliser la sélection actuelle comme chaîne de requête.
LaunchQuery (Boolean) - True lance la requête.
SetLanguagePair
Définit les langues pour le service de traduction.
SetLanguagePair (LanguageFrom, LanguageTo)
ActiveDocument.Research.SetLanguagePair LanguageFrom:=wdAfrikaans, LanguageTo:=wdAfrikaans
Arguments
Les arguments nommés :
LanguageFrom (WdLanguageID) - Spécifie la langue source.
Ici on trouve valeurs possible pour
LanguageTo (WdLanguageID) - Spécifie la langue de traduction.
Ici on trouve valeurs possible pour