v3.0.0.77

CommonModules/ЗагрузкаДанныхИзExcel_ЧтениеЭксель/Ext/Module.bsl

@@ -2,7 +2,7 @@
 // Содержит только COM-вызовы
 
 &НаКлиенте
-Функция ОткрытьФайлExcel(ПутьКФайлу)
+Функция ОткрытьФайлExcel(ПутьКФайлу) Экспорт
     Попытка
         Excel = Новый COMОбъект("Excel.Application");
         Excel.Visible = Ложь;
@@ -16,7 +16,7 @@
 КонецФункции
 
 &НаКлиенте
-Процедура ЗакрытьExcel(КонтекстExcel, ВременныйФайл)
+Процедура ЗакрытьExcel(КонтекстExcel, ВременныйФайл) Экспорт
     Если КонтекстExcel = Неопределено Тогда Возврат; КонецЕсли;
     Попытка
         КонтекстExcel.Книга.Close(Ложь);
@@ -27,7 +27,7 @@
 КонецПроцедуры
 
 &НаКлиенте
-Функция ПрочитатьЯчейкуЧисло(Лист, Строка, Колонка, КонтекстОшибки)
+Функция ПрочитатьЯчейкуЧисло(Лист, Строка, Колонка, КонтекстОшибки) Экспорт
     Попытка
         Значение = Лист.Cells(Строка, Колонка).Value;
         Если Значение = Неопределено ИЛИ Значение = "" Тогда Возврат 0; КонецЕсли;
@@ -39,7 +39,7 @@
 КонецФункции
 
 &НаКлиенте
-Функция ПрочитатьЯчейкуСтрока(Лист, Строка, Колонка)
+Функция ПрочитатьЯчейкуСтрока(Лист, Строка, Колонка) Экспорт
     Попытка
         Значение = Лист.Cells(Строка, Колонка).Value;
         Если Значение = Неопределено Тогда Возврат ""; КонецЕсли;
@@ -50,7 +50,7 @@
 КонецФункции
 
 &НаКлиенте
-Функция ИзвлечьИмяЛистаИзФормулы(Формула)
+Функция ИзвлечьИмяЛистаИзФормулы(Формула) Экспорт
     Если Формула = Неопределено Тогда Возврат ""; КонецЕсли;
     Текст = СокрЛП("" + Формула);
     Если Не СтрНачинаетсяС(Текст, "='") Тогда Возврат ""; КонецЕсли;
@@ -60,7 +60,7 @@
 КонецФункции
 
 &НаКлиенте
-Функция НайтиЛист(Книга, ИмяЛиста)
+Функция НайтиЛист(Книга, ИмяЛиста) Экспорт
     Для Каждого Лист Из Книга.Sheets Цикл
         Если ВРег(Лист.Name) = ВРег(ИмяЛиста) Тогда Возврат Лист; КонецЕсли;
     КонецЦикла;