стоит задача загрузки прайс листов с нескольких листов рабочей книги .xls. Как можно загружать сначало с одного листа, потом переходить к следующему и загружать с него и так по их количеству?

(0) Циклом :-)

Для НомерЛиста=1 По Книга.Worksheets.Count Цикл
   Лист = Книга.Worksheets(НомерЛиста);
   // загружаем, загружаем
КонецЦикла;

вопрос в том как перемещаться по листам после загрузки с текущего, как происходит перемещение по ним?

вообще я номер листа (по требованию юзера) указываю на форме отчета:
   Попытка
       НашЛист = НашФайл.Sheets(НомерЛиста); //Устанавливаем нужный лист
   Исключение
       Предупреждение("Указан несуществующий номер листа! = "+НомерЛиста);
       ОбЭксел.WorkBooks.close();
       ОбЭксел.Quit();
       Возврат;
   КонецПопытки;

но ничего не стоит приделать это к циклу

(1) а если вот это загружает с текущего листа, то есть считывает значения, как задавать обработку конкретного листа?

   xl.WorkBooks.Open(СокрЛП(Путь), 0, 1);
   rows = xl.ActiveSheet.UsedRange.Rows.Count;
   НачатьТранзакцию();
   Для row = 1 По rows Цикл
       Деталь      = СокрЛП(xl.Cells(row,1). Text); // 1.  нужен
       Марка       = СокрЛП(xl.Cells(row,2). Text); // 2.  нужен
       Модель      = СокрЛП(xl.Cells(row,3). Text); // 3.  нужен

(2) Что в (1) непонятно?
Или же - как происходит загрузка с листа (как указан в ней текущий лист)?

(5) имхо - не успел прочитать :)

(3) то есть пользователь ставит номер листа?
у меня просто есть прайс где несколько листов, хочется загрузить их все сразу... А вообще тема у вас хорошая!

(4) Если с текущего листа - то и сделай текущим лист с номером НомерЛиста в (1):

xl.Worksheets(НомерЛиста).Activate()

если мне память не изменяет.

Хотя грузить с текущего листа - не есть хорошо.

(5)ну да, как устанавливать загрузку с нужного листа? Исходя из (4) ...

WS=WB.Sheets(Страница);
Страница на форме

WB = Excel.Workbooks.Open(СокрЛП(Путь));

(+5) перебераю листы потом перед обработкой активирую каждый лист, обрабатываю и перехожу к следующему?

(11) Это открытие конкретного файла эксель....
я его уже открыл ->(4), сейчас выясняю как загрузить данные со всех имеющихся у него листов так как их там несколько...

(12) Можно так.

Но, IMHO, лучше заменить в этой самой загрузке xl.Cells(...) на Лист.Cells(...), а в начале загрузки поставить

Лист = xl.Sheets(НомерЛиста);

А вот еще интересный вопрос :-) как грузить из экселевского файла когда в нем нет листов? Такая фигня происходит, когда из 1С в эксель через (_!_) выгружают. я так понял, что создается не книга с листами а только один лист. Приходилась в экселе создавать файл и копировать туда информацию. Может есть другой способ?

(15) Гонишь! Там есть лист и называется он "Sheet1". Сервис - параметры - вид - ярлычки листов

(14) то есть вот так?

xl.WorkBooks.Open(СокрЛП(Путь), 0, 1);
Для НомерЛиста=1 По xl.Worksheets.Count Цикл
   Лист = xl.Sheets(НомерЛиста);    // загружаем, загружаем
   Лист.Cells(...обработка...
КонецЦикла;

(+17) или...
// *>>> перебор имеющихся листов рабочей книги и загрузка с них номенклатуры
xl.WorkBooks.Open(СокрЛП(Путь), 0, 1);  
Для ListNumber = 1 По xl.Worksheets.Count Цикл
   List = xl.Sheets(ListNumber);    // загружаем, загружаем
   xl.Worksheets(List).Activate()
   rows = xl.ActiveSheet.UsedRange.Rows.Count;
   
   
   List.Cells(...обработка...
КонецЦикла;

(17) нормуль
(18) не нормуль, зачем тебе activesheet?
щас придет абрахамс и наругается )))

(18) А теперь перейди на OFF: Поступили первые пожертвования на хостинг мисты - 2200 руб. Спасибо!

(19) голова болит, лениво ругаться ))

xl.Worksheets(List).Activate();
вот это не правильно, выдается ошибка (

Как то так
Переход на другой лист в Excel

(19) да просто я сейчас на Mandriva и тут с клавиатурой проблема что то не дописал... Сейчас вот проверяю перебор листов, пока что не удачно (

xl.WorkBooks.Open(ÑîêðËÏ(Ïóòü), 0, 1);  
Для ListNumber = 1 Ïî xl.Worksheets.Count Цикл
   List = xl.Sheets(ListNumber);    
   rows = List.UsedRange.Rows.Count;
   
   
   
КонецЕсли

сработало!
СПАСИБО!

(25) за такой код из рогатки отстреливают

(16) Не гоню. При обращении к листу "Sheet1" либо "Лист1" выдает ошибку.

(27) WorkSheets(1)