| Вопрос: Как программно сделать гиперссылку на страницу | Добавлено: 17.05.06 14:37 |
Автор вопроса:  AL71
|
|
Здравствуйте.
На "Лист1" есть кнопка, которая создаёт новую (следующую, очередную) страницу в книге Exel, даёт ей очередное порядковое имя и на "Лист1" создаёт гипперссылку на эту страницу. Не получается задать в коде: "ч" - переменная типа Integer высчитанная и заданная программно, например - "25" как его правильно вставить на место "ч" в приведённом ниже фрагменте кода (создан при автозаписи макроса): Cells(m, 3).Select ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _ "'ч',A1", TextToDisplay:="перейти" Пробовал по всякому - знаний не хватает разобраться и сделать правильно. Может можно как нибудь по другому сделать эту часть кода? Заранее спасибо. |
| Ответы | Всего ответов: 1 |
|
Номер ответа: 1 Автор ответа:  AL71 Вопросов: 1 Ответов: 1 |
Профиль | | #1 | Добавлено: 18.05.06 05:08 |
|
Сам и ответ напишу, может кому пригодится:
... SubAddress:= _ "'ч',A1", TextToDisplay:="перейти" - тут я на один знак ошибся (вместо восклицательного знака запятую поставил - результат проб и ошибок) эта строка в оригинале (через запись макроса) должна была выглядеть так: ... SubAddress:= _ "'ч'!A1", TextToDisplay:="перейти" - а что бы она заработала её нужно было написать вот так (без апострофов): ч & "!A1", TextToDisplay:="перейти" Благодарю за решающую подсказку и оперативность модератору Amed'у с форума VBA сайта www.vbstreets.ru |
||
Страница: 1 |