Classe Parameters (Excel VBA)

Collection d'objets Parameter pour la table de requête spécifiée. Pour utiliser une variable de classe Parameters, elle doit d'abord être instanciée, par exemple

Dim prms as Parameters
Set prms = ActiveCell.QueryTable.Parameters

For Each

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

Dim prm As Parameter
For Each prm In ActiveCell.QueryTable.Parameters
	
Next prm

Add

Cette méthode crée un paramètre de requête.

Add (Name, iDataType)

Set qt = Sheets("sheet1").QueryTables(1) 
qt.Sql = "SELECT * FROM authors WHERE (city=?)" 
Set param1 = qt.Parameters.Add("City Parameter", _ 
 xlParamTypeVarChar) 
param1.SetParam xlConstant, "Oakland" 
qt.Refresh

Arguments

Un argument nommé

Name (String) - Nom du paramètre spécifié. Ce nom doit correspondre à la clause du paramètre de l'instruction SQL.

Optional arguments

Les arguments suivants sont facultatifs

iDataType (XlParameterDataType) - Type de données du paramètre. Il peut s’agir de n’importe quelle constante XlParameterDataType . Ces valeurs correspondent à des types de données ODBC. Elles indiquent le type de valeur que le pilote ODBC attend de recevoir. Microsoft Excel et le gestionnaire de pilotes ODBC forcent la valeur de paramètre fournie dans Excel dans le type de données correct pour le pilote.

Ici on trouve valeurs possible pour XlParameterDataType

Count

Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveCell.QueryTable.Parameters.Count

Delete

Cette méthode supprime l'objet.

ActiveCell.QueryTable.Parameters.Delete

Item

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

Le nom de l’objet est la valeur des propriétés Name et value .

Item (Index)

Index: Nom ou numéro d'index de l'objet.

Dim prm As Parameter
Set prm = ActiveCell.QueryTable.Parameters(Index:=1)