Klasse Research - Recherchedienst (Excel VBA)
Die Klasse Research stellt die Steuerelemente einer Recherche-Abfrage dar. Um eine Research -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Dim rsr as Research
Set rsr = ActiveWorkbook.Research
IsResearchService
Gibt an, ob der im ServiceID-Parameter angegebene GUID einem aktuell konfigurierten Dienst entspricht.
IsResearchService (ServiceID)
ServiceID: Gibt eine GUID an, die den Recherchedienst kennzeichnet.
Dim strServiceID As String: strServiceID =
Dim booIsResearchService As Boolean
booIsResearchService = ActiveWorkbook.Research.IsResearchService(ServiceID:=strServiceID)
Query
Gibt eine Rechercheabfrage an.
Query (ServiceID, QueryString, QueryLanguage, UseSelection, LaunchQuery)
Dim strServiceID As String: strServiceID =
ActiveWorkbook.Research.Query ServiceID:=strServiceID
Arguments
Ein benanntes Argument
ServiceID (String) - Gibt eine GUID an, die den Recherchedienst kennzeichnet.
Optional arguments
Die folgenden Argumente sind optional
QueryString (String) - Gibt die Abfragezeichenfolge an.
QueryLanguage - String
UseSelection (Boolean) - True, wenn die aktuelle Auswahl als Abfragezeichenfolge zu verwenden.
LaunchQuery (Boolean) - True, wird die Abfrage gestartet.
SetLanguagePair
Legt die Sprachen für den Übersetzungsdienst fest.
SetLanguagePair (LanguageFrom, LanguageTo)
Dim lngLanguageFrom As Long: lngLanguageFrom =
Dim lngLanguageTo As Long: lngLanguageTo =
ActiveWorkbook.Research.SetLanguagePair LanguageFrom:=lngLanguageFrom, LanguageTo:=lngLanguageTo
Arguments
Hier sind die benannte Argumente :
LanguageFrom (Long) - Gibt die Sprache an, aus der übersetzt werden soll.
LanguageTo (Long) - Gibt die Sprache an, in die übersetzt werden soll.