Propriété QueryTable.TextFileThousandsSeparator (Excel)

Renvoie ou définit le caractère séparateur de milliers utilisé par Microsoft Excel lorsque vous importez un fichier texte dans une table de requête. La valeur par défaut est le caractère séparateur des milliers du système. String en lecture/écriture.

Syntaxe

expression. TextFileThousandsSeparator

Expression Variable qui représente un objet QueryTable .

Remarques

Utilisez cette propriété uniquement lorsque votre table de requête est basée sur des données d’un fichier texte (avec la propriété QueryType définie sur xlTextImport) lorsque le fichier contient des séparateurs décimaux et des milliers qui sont différents de ceux utilisés sur l’ordinateur en raison d’un paramètre de langue différent utilisé.

Le tableau suivant présente les résultats lorsque vous importez du texte dans Microsoft Excel à l’aide de différents séparateurs. Les résultats numériques sont affichés dans la colonne la plus à droite.

Séparateur décimal système	Séparateur des milliers du système	Valeur de TextFileDecimalSeparator	Valeur de TextFileThousandsSeparator	Texte importé	Valeur de la cellule (type de données)
Period	Virgule	Virgule	Point	123.123,45	123,123.45 (numérique)
Point	Virgule	Virgule	Virgule	123.123,45	123.123,45 (texte)
Virgule	Point	Virgule	Point	123.123,45	123,123.45 (numérique)
Point	Virgule	Point	Virgule	123.123,45	123 123.45 (texte)
Point	Virgule	Point	Espace	123.123,45	123,123.45 (numérique)

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.

La propriété TextFileThousandsSeparator s'applique uniquement aux objets QueryTable.

Exemple

Cet exemple montre comment sauvegarder le caractère séparateur des milliers d'origine et comment le remplacer par un point dans la première table de requête de la feuille « Sheet1 », en vue de l'importation d'un fichier texte français (par exemple) dans une version anglaise (États-Unis) de Microsoft Excel.

strDecSep = Worksheets("Sheet1").QueryTables(1) _ 
 .TextFileThousandsSeparator 
Worksheets("Sheet1").QueryTables(1) _ 
 .TextFileThousandsSeparator = "."

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.