Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
19 мая 2025, 21:55

Загрузка из excel в справочник

Автор eXstyle, 08 мая 2025, 09:06

0 Пользователей и 1 гость просматривают эту тему.

eXstyle

Здравствуйте. Есть документ excel из которого нужно загрузить группы и элементы.
пример справочника:
100 - группа 1
110 - Группа 2 у которой родитель группа 1
110.105.00 - Элемент 1 у которого родитель группа 2
120 - группа 3 у которой родитель группа 1
120.106.00 - Элемент 2 у которого родитель группа 3

200 - группа 4
210 - Группа 5 у которой родитель группа 4
210.105.00 - Элемент 1 у которого родитель группа 5
220 - группа 6 у которой родитель группа 4
220.106.00 - Элемент 2 у которого родитель группа 6


Процедура Выполнить()
     ExcelApp = СоздатьОбъект("Excel.Application");
     Спр = СоздатьОбъект("Справочник.ОсновныеСредства");

    Попытка
        Workbook = ExcelApp.Workbooks.Open("D:/os1.xlsx");
        Лист = Workbook.Sheets(1);
       
        Для НомерСтроки = 2 По Лист.UsedRange.Rows.Count Цикл 
            Название = Лист.Cells(НомерСтроки, 2).Value;
            Код = Лист.Cells(НомерСтроки, 1).Value;

//*********Вот как тут прописать обработку?*********
           
КонецЦикла;
   

        Workbook.Close();
    Исключение

    КонецПопытки;
    ExcelApp.Quit();
КонецПроцедуры



Подскажите, пожалуйста, как правильно написать обработку.

sali

можно проверять на родителя....на его уровень
к примеру,
тТовар=СтрокаТЧ.нОМЕНКЛАТУРА.Родитель;
пока тТовар.Уровень() > 0 Цикл
тТовар = тТовар.Родитель;
КонецЦикла;
Если тТовар = Справочники.Номенклатура.НайтиПоНаименованию("Товары") Тогда   
//...какой-то код
конецесли;
здесь идет проверка до самого первого уровня, потому что в бухгалтерии под папкой "Товары" было дохрена других папок и нужно было определять товар (тоже из Ecselя) к какой тч мы должны его приписать

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск