Добрый день. Заранее хочу сказать спасибо всем знатокам данного сайта, очень много интересных и полезных идей взято именно от сюда. Не нашел данной темы, поэтому решил первый раз спросить совета.
Проблема такая. Есть таблица (пример во вложении) с гиперссылками (столбец А), необходимо чтобы, при нажатии на определенную гиперссылку, в столбце С той же строки, значение увеличивалось на 1.
Да, и еще, может кто знает, как зафиксировать первый лист "Оглавление", чтобы он всегда оставался на месте при переходе по другим листам, а не убегал влево. Все примеры, которые находил, не помогают. Как вариант, можно конечно, поставить гиперссылку на каждый лист, которая будет вести на первый, но для меня это не очень удобно.
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Sheets("Оглавление").Cells(Target.Range.Cells.Row, 3) = Sheets("Оглавление").Cells(Target.Range.Cells.Row, 3) + 1
End Sub
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
Target.Range.Cells.Offset(0, 2) = Target.Range.Cells.Offset(0, 2) + 1
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
End Sub
Согласие есть продукт при полном непротивлении сторон