Propriété QueryTable.TextFileConsecutiveDelimiter (Excel)
Cette propriété a la valeur True si les séparateurs consécutifs sont interprétés comme un séparateur unique lorsque vous importez un fichier texte dans une table de requête. La valeur par défaut est False. Boolean (en lecture/écriture).
Syntaxe
expression. TextFileConsecutiveDelimiter
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), et uniquement si la valeur de la propriété TextFileParseType est xlDelimited.
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é TextFileConsecutiveDelimiter s'applique uniquement aux objets QueryTable.
Exemple
Cet exemple montre comment définir le caractère d'espacement comme caractère séparateur de la table de requête située dans la première feuille de calcul du premier classeur, puis comment actualiser la table de requête. Les espaces consécutifs sont interprétés comme un seul séparateur.
Set shFirstQtr = Workbooks(1).Worksheets(1)
Set qtQtrResults = shFirstQtr.QueryTables _
.Add(Connection := "TEXT;C:\My Documents\19980331.txt", _
Destination := shFirstQtr.Cells(1, 1))
With qtQtrResults
.TextFileParseType = xlDelimited
.TextFileSpaceDelimiter = True
.TextFileConsecutiveDelimiter = True
.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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour