Запись гиперссылки на ячейку

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Запись гиперссылки на ячейку (Макросы/Sub)

ees

Дата: Понедельник, 03.07.2017, 17:31 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 15

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Доброго времени суток!

Не получается записать гиперссылку на ячейку в листе, которая может изменяться.

Запись макросов выдала вот такой вот код:

однако мне необходимо запись "Лист1!A10" заменить на запись типа Worksheets(list).Cells(x, y), где list = "Лист1", x = 10, y = 1, потому что эти параметры будут вычисляться.

Сам текст ячейки можно заменить на строковую переменную, а вот как быть с заданием адреса?

Подскажите пожалуйста, как можно записать гиперссылку.

Спасибо!

Сообщение отредактировал ees - Понедельник, 03.07.2017, 17:38

Ответить

buchlotnik

Дата: Понедельник, 03.07.2017, 19:35 | Сообщение № 2

Группа: Заблокированные

Ранг: Участник клуба

Сообщений: 3442

Репутация: 929 ±

Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG

как-то так[vba]

Код

List = "Лист1"
x = 10
y = 1
s = List & "!" & Cells(x, y).Address
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:=s, TextToDisplay:=s

[/vba]