Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Формула Гиперссылки работает, а макрос записывает фиксированное значение и все рушится / 3 сообщений из 3, страница 1 из 1
01.06.2007, 12:15:08
    #34567312
rosa777
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Формула Гиперссылки работает, а макрос записывает фиксированное значение и все рушится
Написал формулу на листе:
=ГИПЕРССЫЛКА(УПРАВЛ_ПЕРЕНОСОМ_ЗАРПЛ!B3;"ВЫДЕЛЕНИЕ ЗАРПЛАТЫ ДЛЯ ПЕРЕНОСА")
Все переходит, Выделяет переменные диапазоны в зависимости от содержимого ячейки B3 / все отлично!

Записываю макрос:
ЗАПИСЬ МАКРОСА ДАЕТ ФИКСИРОВАННЫЙ ПЕРЕХОД
Sheets("УПРАВЛ_ПЕРЕНОСОМ_ЗАРПЛ").Select
Range("B6").Select
Application.Goto Reference:="РЕЕСТР_ЗАРПЛАТА2!R8C1:R20C14"

КАК СДЕЛАТЬ ЕГО ЗАВИСИМЫМ ОТ СОДЕРЖИМОГО ЯЧЕЙКИ B3 ?
БЬЮСЬ УЖЕ ДВА ДНЯ

Файл с макросом прилагается. Пишите.

rosa777@yandex.ru
...
Рейтинг: 0 / 0
01.06.2007, 12:27:32
    #34567378
rosa777
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Формула Гиперссылки работает, а макрос записывает фиксированное значение и все рушится
ФАЙЛ ЗААРХИВИРОВАННЫЙ ПРИЛАГАЕТСЯ
...
Рейтинг: 0 / 0
01.06.2007, 13:14:19
    #34567585
Deggasad
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Формула Гиперссылки работает, а макрос записывает фиксированное значение и все рушится
Замени макрос
Код: plaintext
1.
2.
3.
4.
5.
Sub ПЕРЕХОД_ПО_ГИПЕРССЫЛКЕ()
    With Workbooks("УЧЕТ_ЗАРПЛАТЫ_ТЕСТ").Sheets("РЕЕСТР_ЗАРПЛАТА2")
    .Select
    .Range("A8:N" & .Columns( 1 ).Find("Активная ячейка").Row).Select
    End With
End Sub

А вообще выделить лист

Код: plaintext
Sheets("РЕЕСТР_ЗАРПЛАТА2").Select

Выделить диапазон

Код: plaintext
1.
2.
3.
4.
Range("A8:N26").Select
или
Range("A8" , "N26").Select
или
Range(cells( 8 ,  1 ) , cells( 26 ,  14 )).Select
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Формула Гиперссылки работает, а макрос записывает фиксированное значение и все рушится / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]