Создайте гиперссылку на другой лист в той же книге на первую непустую ячейку - PullRequest
0 голосов
/ 04 марта 2019

У меня есть основной лист, на котором я управляю своими сделками с валютой на FOREX.На этом основном листе я сделал кнопки, которые я хотел бы гиперссылку на последующие листы, которые содержат ежедневные данные для каждой конкретной валютной пары.

Я могу создать гиперссылку на сам лист, используя функцию гиперссылки, но я хочу, чтобы гиперссылка действительно нашла первую пустую ячейку в столбце B, а затем подсчитала 10 ячеек, чтобы последние десять ячеек быливидно на листе.

Я пытался использовать комбинации и варианты Indirect, Offset, CountA и Match, но безрезультатно.Пожалуйста, помогите. Снимок основного экрана Снимок экрана ежедневного листа

1 Ответ

0 голосов
/ 06 марта 2019

Для упрощения вы можете повторить этот код для каждой кнопки.Измените только одну строку для каждой кнопки (и название подпрограммы, конечно)

Sub JPY_Daily_click()
Dim sh As Worksheet
Set sh = ThisWorkbook.Sheets("JPY_Daily")
myrow = sh.Cells(sh.Rows.Count, 1).End(xlUp).Row - 10
sh.Activate
sh.Range("A" & myrow).Select
End Sub
...