Удаление столбцов ексель по условию из 1с 8.2

1. 04.05.21 13:03 Сейчас в теме
Уважаемые форумчане
пытаюсь удалить ненужные столбцы в ексель в цикле 1с, но при удалении столбца видимо номер столбца меняется и он удаляет не все колонки, видимо надо как то надо отлавливать номер колонки, может есть другой вариант?

  Excel = Новый COMОбъект("Excel.Application");
			Workbook = Excel.Workbooks.Open(ПолноеИмяФайла);
			Лист = Workbook.Sheets(1);
			ВсегоКолонок = Лист.Cells(1,1).SpecialCells(11).Column;
			ВсегоСтрок = Лист.Cells(1,1).SpecialCells(11).Row;
                       
        Список = Новый СписокЗначений;
	Список.Добавить("Наименование товаров");
	Список.Добавить("Количество");
	Список.Добавить("Единица измерения");
	Список.Добавить("Цена");
	Список.Добавить("НДС");
	Список.Добавить("Стоимость поставки с учётом НДС");
	Список.Добавить("Стоимость поставки");
	Список.Добавить("Сумма НДС");
                     
                       Для Строка = 1 по ВсегоКолонок цикл
				 СтрокаПоиска = Список.НайтиПоЗначению(СокрЛП(Лист.Cells(1,Строка).Value));
				 Если  СтрокаПоиска = Неопределено  Тогда
					 Лист.Columns(Строка).Delete();	
				КонецЕсли;
			КонецЦикла;
Показать
Найденные решения
2. lefthander 04.05.21 13:15 Сейчас в теме
(1)
может есть другой вариант?
Попробуйте цикл не от начала а от конца...
ЗЫ для таблицы значений обычно добавляется колонка пометки удаления, затем проставляются пометки и уж потом удаляются ненужные колонки. Может это натолкнет Вас на нужные действия.
damir-it; +1 Ответить
Остальные ответы
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
2. lefthander 04.05.21 13:15 Сейчас в теме
(1)
может есть другой вариант?
Попробуйте цикл не от начала а от конца...
ЗЫ для таблицы значений обычно добавляется колонка пометки удаления, затем проставляются пометки и уж потом удаляются ненужные колонки. Может это натолкнет Вас на нужные действия.
damir-it; +1 Ответить
3. damir-it 04.05.21 14:34 Сейчас в теме
(2)Спасибо обратным циклом сработало как надо
Оставьте свое сообщение
Вопросы с вознаграждением