Classe Research - service de recherche (Excel VBA)

La classe Research représente les contrôles d'une requête de Recherche. Pour utiliser une variable de classe Research, elle doit d'abord être instanciée, par exemple

Dim rsr as Research
Set rsr = ActiveWorkbook.Research

IsResearchService

Indique si le GUID spécifié dans le paramètre ServiceID correspond à un service configuré.

IsResearchService (ServiceID)

ServiceID: Spécifie un GUID qui identifie le service de recherche.

Dim strServiceID As String: strServiceID = 
Dim booIsResearchService As Boolean
booIsResearchService = ActiveWorkbook.Research.IsResearchService(ServiceID:=strServiceID)

Query

Spécifie une requête de recherche.

Query (ServiceID, QueryString, QueryLanguage, UseSelection, LaunchQuery)

Dim strServiceID As String: strServiceID = 
ActiveWorkbook.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 (String) - Spécifie la langue de requête pour la chaîne de requête.

UseSelection (Boolean) - True pour utiliser la sélection actuelle comme chaîne de requête. Cela remplace le paramètre QueryString s’il est défini. Valeur par défaut est False.

LaunchQuery (Boolean) - True lance la requête. False affiche le volet Office recherche étendu pour rechercher le service de recherche spécifié.

SetLanguagePair

Définit les langues pour le service de traduction.

SetLanguagePair (LanguageFrom, LanguageTo)

Dim lngLanguageFrom As Long: lngLanguageFrom = 
Dim lngLanguageTo As Long: lngLanguageTo = 
ActiveWorkbook.Research.SetLanguagePair LanguageFrom:=lngLanguageFrom, LanguageTo:=lngLanguageTo

Arguments

Les arguments nommés :

LanguageFrom (Long) - Spécifie la langue source.

LanguageTo (Long) - Spécifie la langue de traduction.