Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Помогите пожалуйста начинающему программисту с кодом!!!
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.1 (8.0)
Masspi
Написал код обработки (конечно не без помощи интернета) и не могу понять где ошибка... Ребята помогите плиз...
Собственно сам код:
//Очистить предыдущие значения.
    ТаблицаДокумента.Очистить();
    ТаблицаДокумента.Колонки.Очистить();
    
    // Создать колонки табличного документа
    ТаблицаДокумента.Колонки.Добавить("Дата",ОписаниеТиповС,"Дата",5);
    ТаблицаДокумента.Колонки.Добавить("Номер",ОписаниеТиповЧ,"Номер",11);
    ТаблицаДокумента.Колонки.Добавить("Район",ОписаниеТиповС,"Район",25);
    ТаблицаДокумента.Колонки.Добавить("Маршрут",ОписаниеТиповС,"Маршрут",25);
    ТаблицаДокумента.Колонки.Добавить("Кол-во ТТ",ОписаниеТиповЧ,"КоличествоТТ",5);
    ТаблицаДокумента.Колонки.Добавить("Вес",ОписаниеТиповЧ,"Вес",6);
    // Последовательное чтение строк с выбранного листа
    Для Строка = 1 По ExcelПоследняяСтрока Цикл
                
        // Обработка нажатия Ctrl + Break
        ОбработкаПрерыванияПользователя();
        
        // Добавить данные в табличную часть экранной формы
        Стр=ТаблицаДокумента.Добавить();
        Стр.Номер                = Строка;
        Попытка
            Стр.Дата                = ExcelЛист.Cells(Строка, 1).Value;
            Стр.Номер                = ExcelЛист.Cells(Строка, 2).Value;
            Стр.Район                = ExcelЛист.Cells(Строка, 3).Value;
            Стр.Маршрут                = ExcelЛист.Cells(Строка, 4).Value;
            Стр.КоличествоТТ        = ExcelЛист.Cells(Строка, 5).Value;
            Стр.Вес                 = ExcelЛист.Cells(Строка, 6).Value;

Ошибку выдает при очистке предыдущего значения...
MATEVI
Какая ошибка? Текст приведите.
Masspi
Значение не является значением объектного типа (Очистить)

Заранее спасибо Вам большое если поможите!!!
Vofka
MATEVI, от жеж вы даётё. С вашей то квалификацие, и со статусом Команда (модераторы) не можете ошибку предугадать и поправить код? Мне за вас стыдно. faceoff.gif crazy.gif smile.gif

Masspi, уважаемый, вылезайте из танка и в студию ПОЛНЫЙ текст ошибки с указанием на строку. Причем номер строки указать в зависимости от того, какой вы кусок кода решили у нас опубликовать! Да, кстати, и полный текст процедуры не помешает.
Masspi
Цитата
{Обработка.ЗагрузкаМаршрутногоЛиста.Форма.Форма(60)}: Значение не является значением объектного типа (Очистить)
ТаблицаДокумента.Очистить();
Vofka
В самом начале попробуйте написать:

ТаблицаДокумента = Новый ТаблицаЗначений;


И я предвкушаю уже следующий вопрос smile.gif
Masspi
Да следующий ))) {Обработка.ЗагрузкаМаршрутногоЛиста.Форма.Форма(101)}: Значение не является значением объектного типа (ТаблицаДокумента)
ЭлементыФормы.ТаблицаДокумента.Значение = ТаблицаДокумента;

Ой забыл сам код:
Попытка
            Стр.Дата                = ExcelЛист.Cells(Строка, 1).Value;
            Стр.Номер                = ExcelЛист.Cells(Строка, 2).Value;
            Стр.Район                = ExcelЛист.Cells(Строка, 3).Value;
            Стр.Маршрут                = ExcelЛист.Cells(Строка, 4).Value;
            Стр.КоличествоТТ        = ExcelЛист.Cells(Строка, 5).Value;
            Стр.Вес                 = ExcelЛист.Cells(Строка, 6).Value;
                    Исключение
            // Не редко происходит ошибка конвертации отдельной ячейки документа
            Сообщить("Ошибка чтения строки файла Microsoft Excel." + Строка + Символы.ПС + ОписаниеОшибки(), СтатусСообщения.Внимание);
        КонецПопытки;
        // Отобразить информацию о ходе выполнения обработки
        Состояние("Обработка файла Microsoft Excel : "
         + "строка " + Строка + " из " + ExcelПоследняяСтрока);
        
     КонецЦикла;
    
     // Закрыть COM соединение для экономии памяти
     ExcelПриложение.Quit();
    
     // Отобразить результаты загрузки в форме элемента
     ЭлементыФормы.ТаблицаДокумента.Значение = ТаблицаДокумента;
     ЭлементыФормы.ТаблицаДокумента.СоздатьКолонки();
MATEVI
Цитата(Vofka @ 10.11.11, 14:56) необходимо зарегистрироваться для просмотра ссылки
MATEVI, от жеж вы даётё. С вашей то квалификацие, и со статусом Команда (модераторы) не можете ошибку предугадать и поправить код? Мне за вас стыдно. faceoff.gif crazy.gif smile.gif


ОФФ...
1. Это Вы так шутите? Квалификация тут ни причем. Но Вы то должны знать, smile.gif что если просят помочь то дают максимально точную информацию, и оформляют по правилам. Для угадывания есть пользователи с "глазиком" smile.gif
Vofka
Цитата
Это Вы так шутите?

Конечно же шучу smile.gif
Ardi
Пользователи с глазиком отвечают - "ЧИТАТЬ 2 УЧЕБНИКА. А потом уже вопросы."
Ибо это бессмысленно.
Masspi
Ребята ну может хоть кто - нибудь скажет..........
Vofka
Цитата
Ребята ну может хоть кто - нибудь скажет..........

Вряд ли. С вами говорить бесполезно. Знаний у вас 0. Поэтому угадывать и исправлять ваши очередные ошибки - желания у людей нету. Здесь не форум экстрасенсов. Вам правильно ответили в 10 посте: читайте книги.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.