Добрый день. У меня небольшая проблемка:
Открываю файл экселя как комобъект:

Экс = Новый COMОбъект("Excel.Application");
Книга = Экс.WorkBooks.Open(ПутьКЭкселю);
НомерСтраницыВКниге = 1;
ВсегоСтраницВКниге = Книга.WorkSheets.Count;

далее хочу обойти страницы книги в цикле:

Пока НомерСтраницыВКниге <= ВсегоСтраницВКниге Цикл
Страница = Книга.WorkSheets(НомерСтраницыВКниге);
ТекСтраница = Книга.Worksheets(Страница.Name).Activate;
...
...
КонецЦикла;


Ругается, что "Поле объекта не обнаружено (Activate)", подскажите как перебрать страницы.

Без скобок происходит обращение к свойствам. В данном случае нужен метод. Соответственно - Activate()

ТекСтраница = Книга.Worksheets(Страница.Name).Activate;
заменить на
Страница.Activate();

А зачем ее активировать? данные и так тырить через Книга.Worksheets(Страница.Name).Cells(x,y).value можно

а зачем активейт? ты и так получил страницу... делай с ней что хочешь... %)


Листы=Книга.WorkSheets;
Для каждого Лист из Листы Цикл
 Сообщить(Лист.Name);
...


либо


Листы=Книга.WorkSheets;
Для к=1 По Листы.Count Цикл
 Лист=Листы.Item(к);
 Сообщить(Лист.Name);
...


Excel = новый COMОбъект("Excel.Application");
   
   Excel.WorkBooks.Open(ИмяФайлаЭксель);
   //WorkBooks = Эксель.WorkBooks();
   КоличествоЛистовКниги = Excel.Sheets().count();
   
   //Сообщить("КоличествоЛистовКниги " + КоличествоЛистовКниги);
   
   Лист = Excel.Sheets(1);
   ИмяЛиста = Лист.Name();
   
   Для Каждого ТекЛист Из Excel.Sheets() Цикл
       гчНомерЗакладки = гчНомерЗакладки + 1;
       ИмяЛиста = ТекЛист.Name();
       Если Найти(ИмяЛиста, "Протокол") > 0 Тогда
           Продолжить;
       КонецЕсли;
       
       ЗагрузитьЛист(ТекЛист);
       
   КонецЦикла;
   
   Excel.Application.Quit();

(6) с просто щетсами и обломаешься

(2) Спасибо, все получилось.

(3) Просто до меня обработка была заточена под файлы с одним листом, и данные там читаются через Экс.Cells проще страницу активировать, чем все переписывать.

(8) зачем переписывать?
Пока НомерСтраницыВКниге <= ВсегоСтраницВКниге Цикл
Страница = Книга.WorkSheets(НомерСтраницыВКниге);
ТекСтраница = Книга.Worksheets(Страница.Name);
...
...
КонецЦикла;

(7) В чем?

(10) щетс это не только электронные таблицы, но к примеру и диаграммы и еще чего может быть...

(9) мимо

(11) Ну я заведомо знаю что там нету диаграм, но за совет спс.

(13) я бы еще "попинал" за обращение к пропертям с () на конце :)

(14) Не надо :)

а зачем Activate() ? Просто переменная Страница в твоем коде и будет тем что нужно.

(16) я в (8) написал, что данные с листа берутся через Экс.Cells - т.е. из активной страницы Экс.ActiveSheet. т.е. Страница перебирается, а активная страница - нет.

(17) Страница.Cells...

(18) читай (8) до полного просветления :)