Share via


Propriété QueryTable.CommandType (Excel)

Renvoie ou définit l’une des constantes XlCmdType suivantes : xlCmdCube, xlCmdDefault, xlCmdSql ou xlCmdTable. La constante retournée ou définie décrit la valeur de la propriété CommandText . La valeur par défaut est xlCmdSQL. Énumération XlCmdType en lecture-écriture.

Syntaxe

expression. Commandtype

Expression Expression qui renvoie un objet QueryTable .

Remarques

Vous pouvez définir la propriété CommandType uniquement si la valeur de la propriété QueryType pour la table de requête ou le cache de tableau croisé dynamique est xlOLEDBQuery.

Si la propriété CommandType a la valeur xlCmdCube, vous ne pouvez pas modifier cette valeur si un rapport de tableau croisé dynamique est associé à la table de requête.

Si vous importez des données à l’aide de l’interface utilisateur, les données d’une requête web ou d’une requête de texte sont importées en tant qu’objet QueryTable , tandis que toutes les autres données externes sont importées en tant qu’objet ListObject .

Si vous importez des données à l’aide du modèle objet, les données d’une requête web ou d’une requête de texte doivent être importées en tant que QueryTable, tandis que toutes les autres données externes peuvent être importées en tant que ListObject ou QueryTable.

Utilisez la propriété QueryTable du ListObject pour accéder à la propriété CommandType .

Exemple

Cet exemple montre comment définir la chaîne de commande de la source de données ODBC de la première table de requête. La chaîne de commande constitue une instruction SQL.

Set qtQtrResults = _ 
 Workbooks(1).Worksheets(1).QueryTables(1) 
With qtQtrResults 
 .CommandType = xlCmdSQL 
 .CommandText = _ 
 "Select ProductID From Products Where ProductID < 10" 
 .Refresh 
End With

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.