Свойство QueryTable.TextFileDecimalSeparator (Excel)

Возвращает или задает символ десятичного разделителя, который Microsoft Excel использует при импорте текстового файла в таблицу запросов. По умолчанию используется системный знак разделителя десятичных разрядов. Для чтения и записи, String.

Синтаксис

expression. TextFileDecimalSeparator

Выражение Переменная, представляющая объект 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.

Свойство TextFileDecimalSeparator применяется только к объектам QueryTable .

Пример

В этом примере исходный десятичный разделитель сохраняется и задается запятой для первой таблицы запросов на Листе 1 при подготовке к импорту французского текстового файла (например,) в версию Microsoft Excel на английском языке США.

strDecSep = Worksheets("Sheet1").QueryTables(1) _ 
 .TextFileDecimalSeparator 
Worksheets("Sheet1").QueryTables(1) _ 
 .TextFileDecimalSeparator = ","

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.