SetParam, méthode
Voir aussiS'applique àExempleDétailsCette méthode définit un paramètre pour la table de requêtes spécifiée.
expression.SetParam(Type, Value)
expression Obligatoire. Expression qui renvoie un des objets répertoriés dans la liste S'applique à.
Type Argument XlParameterType obligatoire.
XlParameterType peut être l'une de ces constantes XlParameterType.
xlConstant. Utilise la valeur spécifiée par l'argument Value.
xlPrompt. Affiche une boîte de dialogue qui demande à l'utilisateur de fournir la valeur. L'argument Value spécifie le texte affiché dans la boîte de dialogue.
xlRange. Utilise la valeur de la cellule dans le coin supérieur gauche de la plage. L'argument Value spécifie un objet Range.
Value Argument de type Variant obligatoire. Valeur du paramètre spécifié, comme indiquée dans la description de l'argument Type.
Exemples
Cet exemple montre comment modifier l'instruction SQL pour la table de requêtes 1. La clause « (city= ?) » indique que la requête est une requête paramétrée et l'exemple montre comment affecter la constante « Oakland » à la valeur de la ville.
1 2 3 4 5 6
| 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 |
Cet exemple montre comment affecter la valeur de la cellule A2 à la valeur de la ville sur la feuille de calcul 2.
1 2 3 4 5
| Set qt = Sheets("sheet1").QueryTables(1)
qt.Sql = "SELECT * FROM authors WHERE (city=?)"
Set param1 = qt.Parameters.Add("City Parameter", _
xlParamTypeVarChar)
param1.SetParam xlRange, Range("sheet2!a1") |
qt.Refresh
Partager