Имя: Пароль:
1C
1С v8
Загрузка из Excel в 1с
0 Tumakota
 
19.04.12
07:36
Всем доброго времени суток, при загрузке выдает вот такую ошибку, кто может подсказать как ее исправить, заранее благодарен:

   Пока СокрЛП(Конец) <> "итого :" И СокрЛП(Конец) <> "сумма набора"  Цикл
       Если (СокрЛП(Лист.Cells(СчСтроки,10).Text) = "") ИЛИ (Лист.Cells(СчСтроки,10).Text = 0) Тогда
           счСтроки = счСтроки + 1;
           Конец =  Лист.Cells(счСтроки,6).Text;
           Продолжить;
1 не человек
 
19.04.12
07:38
(0) а где ошибка?
2 Wobland
 
19.04.12
07:43
.Text = 0

меня вот это смущает
3 CepeLLlka
 
19.04.12
07:43
(СокрЛП(Лист.Cells(СчСтроки,10).Text) = "")

Тут наверное можно просто использовать - ЗначениеЗаполнено()
Я вот недавно делал чё-то.. использовал сдесь
Лист.Cells(счСтроки,6).Text
- не "text" А "value"
4 Tumakota
 
19.04.12
07:49
(0)Извините что не сразу скинул ошибку, но вот такая ошибка выходит
{ВнешняяОбработка._ЗагрузкаПрихода(1920)}: Ошибка при вызове метода контекста (Cells): Произошла исключительная ситуация (0x800a03ec)
           Конец =  Лист.Cells(счСтроки,6).Text;
по причине:
Произошла исключительная ситуация (0x800a03ec)
5 Wobland
 
19.04.12
07:53
(4) счСтроки у тебя хрень показывает скорей всего
6 vde69
 
19.04.12
07:55
7 bvg
 
19.04.12
07:56
попробуй так: Лист.Worksheets.item(1).Cells(счСтроки,1).text
8 D_Pavel
 
19.04.12
08:06
А что находится в ячейке (счСтроки,6)?
В отладчике на Лист.Cells(счСтроки,6) без .Text выдает ошибку?
9 Tumakota
 
19.04.12
08:08
и с Value и  Text выдает, там находиться число
10 Wobland
 
19.04.12
08:11
счСтроки = счСтроки + 1;
Конец =  Лист.Cells(счСтроки,6).Text;

поменяй строки местами
11 vde69
 
19.04.12
08:17
(9) что будет если у тебя "итого :" не в 6 колонке а сдвинуто например в 5-у

поставь нормальную проверку конца листа....
12 Tumakota
 
19.04.12
09:11
С этим совсем разобрался, все спасибо теперь возникла другая проблема, он почему то когда загружает наименование номенклатуры загружает ее цифрами, хотя там нету цифр, не кто не подскажет в чем может быть загвоздка?

стрТЗ = ТЗ.Добавить();
       ПромНоменклатура            = СокрЛП(Лист.Cells(СчСтроки,1).Value);
         стрТЗ.Номенклатура            = ПромНоменклатура;
13 Wobland
 
19.04.12
09:13
(12) текст вместо велью? это раз. стрТЗ.Номенклатуру ещё неплохо бы поискать в справочнике. это два
14 Wobland
 
19.04.12
09:14
(12) что было?
15 Tumakota
 
19.04.12
09:24
поиск в справочники есть, он с начало загружает в таблицу обработки потом ищет в справочники, но в таблицу обработки он загружает уже число, и не зависимо Велью там или Текст он загружает числа которых ваще нету в екселе