![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Форумчанин
Регистрация: 21.10.2012
Сообщений: 208
|
![]()
Добрый вечер!
Помогите плиз. Надо макрос: Выбираем в списке нужный лист, нажимаем кнопку перейти и переходим ) |
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 31.12.2010
Сообщений: 2,133
|
![]()
Если это не учебное задание, то в Excel эта функция реализована: правый клик по любой из кнопок перехода по листам (|< < > >|)...
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
|
![]() |
![]() |
![]() |
#3 |
Форумчанин
Регистрация: 21.10.2012
Сообщений: 208
|
![]()
Это не учебное задание)
перейти на лист я могу и нажав на соответствующий ярлык но надо бы так. На листах будут базы, на первом выбираем нужную и мы на нужной базе, выбираем нужные строки и формируем то, что надо. "То, что надо" уже у меня есть, а вот красивого перехода к нужному листу нет( Поможите , люди добрые). Надо сделать активным нужный лист после нажатия кнопки в соответствии со значением в определённой ячейке. |
![]() |
![]() |
![]() |
#4 |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]()
может вас устроит просто гиперссылками?
Единственный способ стать умнее, играть с более умным противником...
|
![]() |
![]() |
![]() |
#5 |
Форумчанин
Регистрация: 21.10.2012
Сообщений: 208
|
![]()
С гиперссылками ни какой автоматизации не получится .
Нельзя приделать "если" к Sheets("Лист").Select : если А1=1 то лист1 если А1=2 то лист2 и т.д. ??? Только я нихт знать как это делать. |
![]() |
![]() |
![]() |
#6 | |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
![]() Цитата:
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
![]() |
![]() |
![]() |
#7 |
Форумчанин
Регистрация: 21.10.2012
Сообщений: 208
|
![]()
Спасибо всем за участие, я нашел то, что мне надо:
Sub Using_IF() Dim x As Integer x = Range("A1") If x = 1 Then Sheets("Лист2").Select ElseIf x = 2 Then Sheets("Лист3").Select End If End Sub |
![]() |
![]() |
![]() |
#8 |
Форумчанин
Регистрация: 16.04.2010
Сообщений: 695
|
![]()
может вместо select - activate поставить?
Единственный способ стать умнее, играть с более умным противником...
|
![]() |
![]() |
![]() |
#9 |
Форумчанин
Регистрация: 21.10.2012
Сообщений: 208
|
![]()
при переходе на нужный лист человек будет вносить данные и как-бы активация и так произойдет, но спс.
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вставка текста при нажатии кнопки | Payalnick | JavaScript, Ajax | 8 | 27.08.2011 21:59 |
Прога вылетает при нажатии кнопки.. | Дмитрий142 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 2 | 15.03.2011 08:36 |
Как вывести информацию при нажатии на ссылку в нужный div ??? | 333_org_ua | HTML и CSS | 1 | 13.11.2010 13:51 |
Ошибка при нажатии кнопки | Skynet91 | БД в Delphi | 1 | 08.02.2010 19:45 |
Выполнение макроса при нажатии на Лист | KinderX | Microsoft Office Excel | 7 | 01.07.2009 17:19 |