Здравствуйте!У меня тут не большая проблема...Есть справочник в нем создаётся множество других справочников (т.е. они созданы и  могут быть как пустые так и заполненные  в данные момент)и в их табличные части должны загружаться данные из Excel,но у меня тут какой-то баг выходит данные не заносятся и не изменяются не пойму почему...Заранее благодарен за помощь.
&НаКлиенте
Процедура ЗагрузитьИзExcel(Команда)
  Эксель = Новый COMОбъект("Excel.Application");
          Книга = Эксель.WorkBooks.Open("C:\Users\Администратор\Downloads\1с");
  Лист = Книга.WorkSheets(1);  
          ВсегоКолонок = Лист.Cells(1,1).SpecialCells(11).Column;
  ВсегоСтрок = Лист.Cells(1,1).SpecialCells(11).Row;      
 
  Док = Справочники.Журнал.Выбрать();  
  Пока Док.Следующий() Цикл    
       
     ТЧ = Док.Ведомость;    
     Для каждого Стр из ТЧ Цикл    
       
     КонецЦикла;  
  КонецЦикла;      
  Для Строка = 1 По ВсегоСтрок Цикл
     
     Для Колонка = 1 По ВсегоКолонок Цикл
     Студент = Справочники.Студенты.НайтиПоНаименованию(СокрЛП(Лист.Cells(Строка,Колонка).Value));      
     Если Студент.Пустая() Тогда
        Сообщить("В строке "+ Строка+ " введен неверно студент.")
     Иначе  
        ТЧ.Студент = Студент;
     КонецЕсли;    
     Попытка
        ТЧ.Понедельник = Перечисления.Оценки.Получить(Лист.Cells(Строка,2).Value);
     Исключение
     КонецПопытки;
     Попытка
        ТЧ.Вторник = Перечисления.Оценки.Получить(Лист.Cells(Строка,3).Value);
     Исключение
     КонецПопытки;
     Попытка
        ТЧ.Среда = Перечисления.Оценки.Получить(Лист.Cells(Строка,4).Value);
     Исключение
     КонецПопытки;
     Попытка
        ТЧ.Пятница = Перечисления.Оценки.Получить(Лист.Cells(Строка,5).Value);
     Исключение
     КонецПопытки;
     Попытка
        ТЧ.Суббота = Перечисления.Оценки.Получить(Лист.Cells(Строка,6).Value);
     Исключение
     КонецПопытки;
     Попытка
        ТЧ.Воскресенье = Перечисления.Оценки.Получить(Лист.Cells(Строка,7).Value);
     Исключение;
     КонецПопытки;
       
 
     КонецЦикла;      
      КонецЦикла;
      Док.Записать();

КонецПроцедуры

Док = Справочники.Журнал.Выбрать(); А где получить объект?)

так на клиенте то... на сервере

Студент = Справочники.Студенты.НайтиПоНаименованию(СокрЛП(Лист.Cells(Строка,Колонка).Value));  Вот тут тоесть

>>Книга = Эксель.WorkBooks.Open("C:\Users\Администратор\Downloads\1с");
это вроде путь к папке. а где сам файл xls ??

А ну да) + на клиенте)

(4) не обязательно помоему писать расширение..
(3) не пойму ничего....

(6) В той строчке находит в отладчике справочник? Если находит, то что бы в дальнейшем получить доступ к записи, нужно для начала получить объект.

(7) а как получить объект?

Док = Справочники.Журнал.Выбрать();  
  Пока Док.Следующий() Цикл    
       
     ТЧ = Док.Ведомость;    
     Для каждого Стр из ТЧ Цикл    
       
     КонецЦикла;  
  КонецЦикла;      
Этот кусок лишний.

Если Студент.Пустая() Тогда
        Сообщить("В строке "+ Строка+ " введен неверно студент.")
        Продолжить;
     Иначе
        ТЧ = Док.Ведомость.Добавить();
        ТЧ.Студент = Студент;
     КонецЕсли;

(10) лишний?

(11)Нет смысла в этих двух циклах, т.к. внутри них ничего не происходит.

(9) получаем справочники перебираем их получаем тч читаем строки и в них записываем...
(11)если я их уберу то как буду загружать в тч

(13)Смотри внимательнее... второе применение КонецЦикла закрывает твой перебор справочников. Перенести Фрагмент " КонецЦикла;  
  КонецЦикла;  " в самый низ твоего кода, если так задумал.
Тогда внутри цикла табличной части справочника будешь перебирать свою таблицу в экселе. Я немного в шоке от этого кода. Но тебе виднее.

(14) сильно косячный код?))

(14)куда в конец?после закрытия цикла по справочникам там циклы начинаются по строкам и колонкам..

(15) Благодаря этому коду, ты умножаешь количество циклов по экселю на количество строк всех элементов справочника.

Включи отладчик и убедишься.

Попытайся описать словами, как ты хочешь реализовать свой алгоритм.

(19) при нажатии на кноку у меня автоматически создаются справочники( пустые), в их табличные части должны загружаться данные из экселя. 1 справочник равен одному листу экселя( их количество совпадает)

Надо сначала читать данные. Только потом создавать элементы справочника по полученным данным.

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

ни кто не поможет7

Чем помочь то? Код в (0) бредовый.

Полнейший бред, начиная с директивы компиляции, заканчивая обращением к перечислению...

Для Строка = 1 По ВсегоСтрок Цикл
     
     Для Колонка = 1 По ВсегоКолонок Цикл
     Студент = Справочники.Студенты.НайтиПоНаименованию(СокрЛП(Лист.Cells(Строка,Колонка).Value));      
     Если Студент.Пустая() Тогда
        Сообщить("В строке "+ Строка+ " введен неверно студент.")

То бишь получаем студентов которые должны быть во всех ячейках файла?

(24) ну как смог...
(25) ну когда я это писал я хотел чтобы имена студентов совпадали с теми которые в справочники.студенты