|
Ошибка " Ожидается ключевое слово 'Тогда' " | ☑ | ||
---|---|---|---|---|
0
Despa1r
20.03.15
✎
16:19
|
Для e=НачСтр По КонСтр Цикл
Если list.Cells(e,1)Font.Italic = Истина Тогда c=list.Cells(e,1).value; v=c-1; list.Range(Excel.Cells(c,1),Excel.Cells(v,1)).Rows.Group(); Продолжить; Иначе Продолжить; КонецЕсли; КонецЦикла; |
|||
1
Fragster
гуру
20.03.15
✎
16:22
|
ошибка выше (или ниже)
|
|||
2
Лефмихалыч
20.03.15
✎
16:23
|
Продолжить;
Иначе Продолжить; КонецЕсли; КонецЦикла; гениально, ящетаю |
|||
3
Shrek_yar
20.03.15
✎
16:24
|
точку забыл
list.Cells(e,1).Font.Italic = Истина |
|||
4
aka AMIGO
20.03.15
✎
16:24
|
(0) у тебя что делает этот (кмк, странный) оператор?
list.Range(Excel.Cells(c,1),Excel.Cells(v,1)).Rows.Group(); |
|||
5
Новый участник
20.03.15
✎
16:25
|
(2) Ненуачо? Нашёл курсив на листе - стал с этим фрагментом работать.
|
|||
6
Despa1r
20.03.15
✎
16:26
|
AMIGO, группирует ячейки в экселе по идее
|
|||
7
Despa1r
20.03.15
✎
16:27
|
Shrek_yar, ошибка ушла, появилась другая
Переменная не определена (КонСтр) Для e=НачСтр По <<?>>КонСтр Цикл |
|||
8
salvator
20.03.15
✎
16:27
|
(7) А что непонятного написано в тексте ошибки?
|
|||
9
Despa1r
20.03.15
✎
16:28
|
Функция Группировка(excel,book,list,Дебиторка)
НачСтр=5; Для q=1 по 10000 Цикл Если list.cells(q,1).value="Итого:" Тогда itogo=list.cells(q,1).value; list.Range(Excel.Cells(itogo,1)).value=КонСтр; Прервать; КонецЕсли; КонецЦикла; Для e=НачСтр По КонСтр Цикл Если list.Cells(e,1).Font.Italic = Истина Тогда c=list.Cells(e,1).value; v=c-1; list.Range(Excel.Cells(c,1),Excel.Cells(v,1)).Rows.Group(); КонецЕсли; КонецЦикла; Для w=НачСтр По КонСтр Цикл Если list.cells(w,1).Font.Bold = Истина Тогда z=list.cells(w,1).value; x=z-1; list.Range(Excel.Cells(z,1),Excel.Cells(x,1)).Rows.Group(); КонецЕсли; КонецЦикла; КонецФункции Полный код. |
|||
10
AntiBuh
20.03.15
✎
16:28
|
(7) может быть Переменная не определена (КонСтр) ?
|
|||
11
Despa1r
20.03.15
✎
16:29
|
Всем большое спасибо, заменил
list.Range(Excel.Cells(itogo,1)).value=КонСтр; на КонСтр=list.Range(Excel.Cells(itogo,1)).value; |
|||
12
Torquader
20.03.15
✎
16:30
|
Точку перед Font поставьте и всё будет работать!!!
|
|||
13
Shrek_yar
20.03.15
✎
16:30
|
ужас))))
|
|||
14
aka AMIGO
20.03.15
✎
16:30
|
или поменяй операторы местами:
list.Range(Excel.Cells(itogo,1)).value=КонСтр; |
|||
15
aka AMIGO
20.03.15
✎
16:31
|
(11) :))
опоздал :) |
|||
16
Бледно Золотистый
20.03.15
✎
16:31
|
(11) А если условие не сработает? Пользователю плюнет же в лицо ошибкой.
|
|||
17
Despa1r
20.03.15
✎
16:32
|
Поставил точку перед Font и заменил строчку с переменной КонСтр :)
Не судите строго, первый код на 1с |
|||
18
aka AMIGO
20.03.15
✎
16:32
|
(17) да всё нормально :)
|
|||
19
salvator
20.03.15
✎
16:33
|
(17) Нормально. Обычно первый код наподобие Сообщить("Хеллоу ворлд");
|
|||
20
Stim
20.03.15
✎
16:33
|
Продолжить;
Иначе Продолжить; КонецЕсли; заменить на //Продолжить; Иначе //Продолжить; КонецЕсли; Продолжить; |
|||
21
Torquader
20.03.15
✎
16:36
|
(20) А "иначе" ты кому оставил ?
|
|||
22
Despa1r
20.03.15
✎
16:37
|
(20)Уже убрал оба "продолжить" и "иначе", благодарю
Возникла новая проблема - на листе excel ничего не группируется :( |
|||
23
Despa1r
20.03.15
✎
16:38
|
Ошибок в коде нет, не знаю в чём может быть проблема(
Пробовал ранее писать excel.range(A1:A11).rows.group и на листе всё отражалось, а этот код не фурычит( |
|||
24
Despa1r
20.03.15
✎
16:38
|
Ой, извиняюсь, list.Range("A6:A16").Rows.Group();
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |