Na to, ako vytvoriť hyperlink na graf, som neprišiel, ale dá sa to obísť takto:
do zvolenej bunky zapíšeš názov toho grafu, t.j. napr. do bunky B6 napíšeš Graf1. Do kódového okna listu napíšeš potom udalostnú procedúru v tvare:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target = "Graf1" Then Sheets(Target.Value).Select
End Sub
Pokiaľ klikneš na bunku B6, aktivuje sa ti Graf1
Do ďalších buniek si môžeš zapísať postupne ostatné názvy grafov. Nebudú to síce hyperlinky, ale bude sa to chovať podobne, a pokiaľ tam nastavíš nejaké vhodné formátovanie, tak na prvý pohľad to bude ako hyperlink i vyzerať.citovat
do zvolenej bunky zapíšeš názov toho grafu, t.j. napr. do bunky B6 napíšeš Graf1. Do kódového okna listu napíšeš potom udalostnú procedúru v tvare:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target = "Graf1" Then Sheets(Target.Value).Select
End Sub
Pokiaľ klikneš na bunku B6, aktivuje sa ti Graf1
Do ďalších buniek si môžeš zapísať postupne ostatné názvy grafov. Nebudú to síce hyperlinky, ale bude sa to chovať podobne, a pokiaľ tam nastavíš nejaké vhodné formátovanie, tak na prvý pohľad to bude ako hyperlink i vyzerať.citovat
RSS nejnovější články