< návrat zpět
MS Excel
Téma: Na každý list vložit hypertext. odkaz
Zaslal/a frank99 11.11.2021 11:59
Dobrý den,
mám soubor s mnoha listy a potřeboval bych do každého listu vložit hypertext.odkaz do buňky třeba C3, aby se po kliknutí na ten odkaz v buňce C3 vrátil na první list - třeba se jménem "start". Lze vytvořit takové makro ? Vkládám JPG s ukázkou pro lepší pochopení.
Děkuji předem za váš čas
F.
Příloha: 51526_ukazka.jpg.jpg (29kB, staženo 23x)
veny(11.11.2021 12:14)#051527
elninoslov(11.11.2021 12:16)#051528 Sub Vytvor_HL()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
Select Case ws.Name
Case "Start", "niečo iné" 'vylúčené listy
Case Else: ws.Range("C3").Hyperlinks.Add ws.Range("C3"), "", "Start!A1", "List Start", "List Start" 'na všetky ostatné urobí link
End Select
Next ws
End Subcitovat
frank99(11.11.2021 12:32)#051529 Děkuji, mnohokrát - funguje ! Perfektní !
F.
citovat