Проект

Общее

Профиль

Работа через COM с Excel » История » Версия 1

Всеволод Дорофеев, 23.10.2019 06:18

1 1 Всеволод Дорофеев
h1. Работа через COM с Excel
2 1 Всеволод Дорофеев
3 1 Всеволод Дорофеев
h3. При передачи большого числа, например, Штрихкода документа, обрезаются символы после 16 знака.
4 1 Всеволод Дорофеев
5 1 Всеволод Дорофеев
Для корректного вывода устанавливаем текстовый формат, затем выводим
6 1 Всеволод Дорофеев
7 1 Всеволод Дорофеев
<pre>
8 1 Всеволод Дорофеев
		Если Лист.Range(ИмяОбласти).Select() Тогда
9 1 Всеволод Дорофеев
			если нрег(ИмяОбласти) = нрег("ШтрихКодДокумента") Тогда
10 1 Всеволод Дорофеев
				Лист.Range(ИмяОбласти).NumberFormat = "@"; // текстовый формат
11 1 Всеволод Дорофеев
			КонецЕсли;
12 1 Всеволод Дорофеев
			Лист.Range(ИмяОбласти).value = " " + прЗначение;
13 1 Всеволод Дорофеев
		Иначе
14 1 Всеволод Дорофеев
			если нрег(ИмяОбласти) = ("КоличествоВыпуска") Тогда
15 1 Всеволод Дорофеев
				сообщить("Не найдена область для заполнения: " + ИмяОбласти);
16 1 Всеволод Дорофеев
			КонецЕсли;
17 1 Всеволод Дорофеев
		КонецЕсли;
18 1 Всеволод Дорофеев
</pre>
19 1 Всеволод Дорофеев
20 1 Всеволод Дорофеев
Прочие форматы:
21 1 Всеволод Дорофеев
22 1 Всеволод Дорофеев
<pre>
23 1 Всеволод Дорофеев
РабочийЛистКниги.Cells(1,1).NumberFormat = "@"; // текстовый формат
24 1 Всеволод Дорофеев
РабочийЛистКниги.Cells(1,2).NumberFormat = "0"; // числовой формат
25 1 Всеволод Дорофеев
РабочийЛистКниги.Cells(1,3).NumberFormat = ""; // Формат даты Selection.NumberFormat = "m/d/yyyy" 
26 1 Всеволод Дорофеев
</pre>