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

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

Синтаксис

выражение. TextFileDecimalSeparator

выражение Переменная, представляющая объект QueryTable .

Примечания

Используйте это свойство, только если таблица запросов основана на данных из текстового файла (если свойство QueryType имеет значение xlTextImport), если файл содержит десятичные разделители и разделители тысяч, которые отличаются от тех, которые используются на компьютере, из-за используемого другого языка.

В следующей таблице показаны результаты импорта текста в Microsoft Excel с использованием различных разделителей. Числовые результаты отображаются в крайнем правом столбце.

Системный десятичный разделитель	Системный разделитель групп разрядов	Значение TextFileDecimalSeparator	TextFileThousandsSeparator value	Импортированный текст	Значение ячейки (тип данных)
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 и обратная связь.