Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Макрос для листания Листов - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Макрос для листания Листов (как составить такой макрос)
Макрос для листания Листов
Ильяс Дата: Четверг, 06.10.2011, 19:46 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 31
Репутация: 0 ±
Замечаний: 0% ±

2010
Здравствуйте. Помогите, пожалуйста, решить след. задачу. Нужно создать такой макрос, кот. позволял бы листать Листы Книги вперед и назад. Например, у меня в книге около 18 Листов. Я хочу создать кнопку и привязать к ней макрос, нажимая на которую я буду переключаться на след. Лист или на предыдущий. неважно эта кнопочка (их будут две) может находиться на каждой странице, но к каждой будет привязан один макрос (для одной кнопки "вперед" и для другой "назад") smile
 
Ответить
СообщениеЗдравствуйте. Помогите, пожалуйста, решить след. задачу. Нужно создать такой макрос, кот. позволял бы листать Листы Книги вперед и назад. Например, у меня в книге около 18 Листов. Я хочу создать кнопку и привязать к ней макрос, нажимая на которую я буду переключаться на след. Лист или на предыдущий. неважно эта кнопочка (их будут две) может находиться на каждой странице, но к каждой будет привязан один макрос (для одной кнопки "вперед" и для другой "назад") smile
Автор - Ильяс
Дата добавления - 06.10.2011 в 19:46
Гость Дата: Четверг, 06.10.2011, 20:04 | Сообщение № 2
Группа: Гости
Сделай кнопку и гиперссылку на следующий лист.Либо туда либо обратно.
 
Ответить
СообщениеСделай кнопку и гиперссылку на следующий лист.Либо туда либо обратно.
Автор - Гость
Дата добавления - 06.10.2011 в 20:04
megavlom Дата: Четверг, 06.10.2011, 20:28 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 105
Репутация: 1 ±
Замечаний: 0% ±

Скопируй кнопки на лист ,топни правой клавишей мыши и выбери -изменить гиперссылку,соответственно ставишь адресс нужного листа.Намного проще и не нужен макрос,лишнее грузить.
К сообщению приложен файл: 5206569.xls (35.5 Kb)
 
Ответить
СообщениеСкопируй кнопки на лист ,топни правой клавишей мыши и выбери -изменить гиперссылку,соответственно ставишь адресс нужного листа.Намного проще и не нужен макрос,лишнее грузить.
Автор - megavlom
Дата добавления - 06.10.2011 в 20:28
RAN Дата: Четверг, 06.10.2011, 20:37 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Да пожалте бриться! biggrin
К сообщению приложен файл: goto.xls (48.0 Kb)

Быть или не быть, вот в чем загвоздка!

Сообщение отредактировал RAN - Четверг, 06.10.2011, 20:38
 
Ответить
СообщениеДа пожалте бриться! biggrin
Автор - RAN
Дата добавления - 06.10.2011 в 20:37
Ильяс Дата: Пятница, 07.10.2011, 07:41 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 31
Репутация: 0 ±
Замечаний: 0% ±

2010
Спасибо всем. В частности спасибо RANу
 
Ответить
СообщениеСпасибо всем. В частности спасибо RANу
Автор - Ильяс
Дата добавления - 07.10.2011 в 07:41
AKSENOV048 Дата: Пятница, 07.10.2011, 09:42 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 134
Репутация: 6 ±
Замечаний: 0% ±

можно еще с Userform. (код от RAN)
К сообщению приложен файл: 0418348.xls (41.5 Kb)
 
Ответить
Сообщениеможно еще с Userform. (код от RAN)
Автор - AKSENOV048
Дата добавления - 07.10.2011 в 09:42
RAN Дата: Пятница, 07.10.2011, 23:53 | Сообщение № 7
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Если с Userform извращаться, то тогда хоть так! tongue
К сообщению приложен файл: 00.xls (68.0 Kb)

Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеЕсли с Userform извращаться, то тогда хоть так! tongue
Автор - RAN
Дата добавления - 07.10.2011 в 23:53
AKSENOV048 Дата: Суббота, 08.10.2011, 00:53 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 134
Репутация: 6 ±
Замечаний: 0% ±

я делал из принципа "меньше размер".
а вообще можно вывести кнопки, на Ленту, с макросом.
 
Ответить
Сообщениея делал из принципа "меньше размер".
а вообще можно вывести кнопки, на Ленту, с макросом.
Автор - AKSENOV048
Дата добавления - 08.10.2011 в 00:53
vlad_jr Дата: Вторник, 05.02.2013, 19:43 | Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Предлагаю редакцию немного попроще:
[vba]
Код
Private Sub CommandButton1_Click()
       AppActivate "Microsoft Excel"    
       SendKeys "^{PGUP}", True
       Me.Caption = ActiveSheet.Name
End Sub

Private Sub CommandButton2_Click()
       AppActivate "Microsoft Excel"    
       SendKeys "^{PGDN}", True
       Me.Caption = ActiveSheet.Name
End Sub
[/vba]
cool

З.Ы. Достоверно работает в файле, который прикреплен уважаемым Старожилом RAN. Спасибо всем!
К сообщению приложен файл: 001.xls (62.5 Kb)


Сообщение отредактировал vlad_jr - Вторник, 05.02.2013, 20:43
 
Ответить
СообщениеПредлагаю редакцию немного попроще:
[vba]
Код
Private Sub CommandButton1_Click()
       AppActivate "Microsoft Excel"    
       SendKeys "^{PGUP}", True
       Me.Caption = ActiveSheet.Name
End Sub

Private Sub CommandButton2_Click()
       AppActivate "Microsoft Excel"    
       SendKeys "^{PGDN}", True
       Me.Caption = ActiveSheet.Name
End Sub
[/vba]
cool

З.Ы. Достоверно работает в файле, который прикреплен уважаемым Старожилом RAN. Спасибо всем!
Автор - vlad_jr
Дата добавления - 05.02.2013 в 19:43
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Макрос для листания Листов (как составить такой макрос)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!