Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Программирование, связанное с MS Office > макрос по перемещению по листам EXCEL

Автор: leonov2006 22.5.2006, 10:53

Добрый день.
помогите составить макрос Excel
т.е. есть Excel файл многостраничный мне нужно запуская макрос каждый зар перемешаться на следующую страницу
Как это можно реализовать. smile

Автор: Artiom 22.5.2006, 12:22

Sheets("nameOfSheet").Activate
это имелось в виду?

Автор: leonov2006 22.5.2006, 12:26

мне нужно при запуске макроса помнить предыущую страницу и открывать для вставкаи значения новую, т.к лист+1

Автор: Artiom 22.5.2006, 13:38

Вот так проходишь по всем страницам

Код


For ls = 1 To Sheets.Count
 Sheets("Лист" & ls).Activate
 ' обновить данные
 ' запомнить данные для вставки
Next

Автор: likhobory 22.5.2006, 13:48

Код


Sheets(ActiveSheet.Next.Name).Activate

Автор: Staruha 22.5.2006, 21:00

Код


Лист1.Range("A1").Value = ActiveSheet.Next.Name
A = Лист1.Range("A1").Value
Sheets(A).Activate