Classe WorkbookQuery (Excel VBA)

Objet qui représente une requête qui a été créée par Power Query.

Set

Pour utiliser une variable de classe WorkbookQuery, elle doit d'abord être instanciée, par exemple

Dim wqy as WorkbookQuery
Set wqy = ActiveWorkbook.Queries(NameOrIndex:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe WorkbookQuery : Workbook.Queries, Queries.Item et Queries.Add

For Each

Voici un exemple de traitement des éléments WorkbookQuery dans une collection

Dim wqyQuerie As WorkbookQuery
For Each wqyQuerie In ActiveWorkbook.Queries
	
Next wqyQuerie

Queries.Add

Ajoute un nouvel objet WorkbookQuery à la collection Queries .

Syntaxe : expression.Add (Name, Formula, Description)

Dim myConnection As WorkbookConnection
Dim mFormula As String
mFormula = _
"let Source = Csv.Document(File.Contents(""C:\data.txt""),null,""#(tab)"",null,1252) in Source"
query1 = ActiveWorkbook.Queries.Add("query1", mFormula)

Arguments

Les arguments nommés :

Name (String) - Nom de la requête.

Formula (String) - Formule Power Query M de la nouvelle requête.

Les arguments suivants sont facultatifs

Description (String) - La description de la requête.

Queries.Count

Cette propriété renvoie un nombre entier qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveWorkbook.Queries.Count

Queries.FastCombine

True pour activer la fonctionnalité de regroupement rapide, tant que le classeur est ouvert. Boolean (en lecture/écriture).

Pour les opérations d’actualisation en mode silencieux, utilisez la propriété FastCombine en association avec la propriété application. DisplayAlerts définie sur false.

ActiveWorkbook.Queries.FastCombine = True

Queries.Item

Cette méthode renvoie un seul objet d'une collection.

Syntaxe : expression.Item (NameOrIndex)

NameOrIndex: Nom ou numéro d’index de l’élément.

Dim wqyQuery As WorkbookQuery
Set wqyQuery = ActiveWorkbook.Queries(NameOrIndex:=1)

Queries.Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Delete

Efface la requête et sa connexion sous-jacente, la supprimant ensuite de la collection Requêtes.

ActiveWorkbook.Queries(1).Delete

Description

La description de la requête. String en lecture/écriture.

ActiveWorkbook.Queries(1).Description =

Formula

La formule Power Query M pour l’objet. String en lecture/écriture.

ActiveWorkbook.Queries(1).Formula =

Name

Nom de la requête. String en lecture/écriture.

ActiveWorkbook.Queries(1).Name =

Parent

Renvoie l’objet parent pour l’objet spécifié. En lecture seule.