Свойство QueryTable.TextFileThousandsSeparator (Excel)
Возвращает или задает символ разделителя тысяч, который Microsoft Excel использует при импорте текстового файла в таблицу запросов. По умолчанию используется системный разделитель тысяч. Для чтения и записи, String.
Синтаксис
expression. TextFileThousandsSeparator
Выражение Переменная, представляющая объект QueryTable .
Замечания
Используйте это свойство только в том случае, если таблица запросов основана на данных из текстового файла (со свойством QueryType , для которого задано значение xlTextImport), если файл содержит десятичные и тысячи разделителей, которые отличаются от используемых на компьютере из-за другого параметра языка.
В следующей таблице показаны результаты импорта текста в Microsoft Excel с помощью различных разделителей. Числовые результаты отображаются в крайнем правом столбце.
| Системный разделитель десятичных разрядов | Разделитель системных тысяч | Значение TextFileDecimalSeparator | Значение TextFileThousandsSeparator | Импортированный текст | Значение ячейки (тип данных) |
|---|---|---|---|---|---|
| Period | Запятой | Запятой | Period | 123.123,45 | 123,123,45 (числовое значение) |
| Period | Запятой | Запятой | Запятой | 123.123,45 | 123.123,45 (текст) |
| Запятой | Period | Запятой | Period | 123,123.45 | 123,123,45 (числовое значение) |
| Period | Запятой | Period | Запятой | 123 123.45 | 123 123.45 (текст) |
| Period | Запятой | Period | Space | 123 123.45 | 123,123,45 (числовое значение) |
При импорте данных с помощью пользовательского интерфейса данные из веб-запроса или текстового запроса импортируются как объект QueryTable , а все остальные внешние данные импортируются как объект ListObject .
При импорте данных с помощью объектной модели данные из веб-запроса или текстового запроса должны быть импортированы как QueryTable, а все остальные внешние данные можно импортировать как ListObject или QueryTable.
Свойство TextFileThousandsSeparator применяется только к объектам QueryTable .
Пример
В этом примере исходный разделитель тысяч сохраняется и задается в качестве точки для первой таблицы запросов на Листе 1 в рамках подготовки к импорту французского текстового файла (например) в версию Microsoft Excel на английском языке США.
strDecSep = Worksheets("Sheet1").QueryTables(1) _
.TextFileThousandsSeparator
Worksheets("Sheet1").QueryTables(1) _
.TextFileThousandsSeparator = "."
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.