MS Excel

Téma: hypertext

Zaslal/a thums icon 16.7.2012 10:25

Zdravím,lze přes ověření dat spustit hypertextový odkaz ? Přes makro určitě, ale jak :)...stačilo by mi jen nakopnout, dodělám sám ( DOUFÁM ). Sloupec A = hypert., buňka B1 ověření, při výběru spusti a otevřít hypert.
Děkuji

Zaslat odpověď >

Jeza, (16.7.2012 13:28)#009028

jen takový pokus
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
If Target.Value <> "" And Cells(Target.Row, 1) <> "" Then ThisWorkbook.FollowHyperlink Cells(Target.Row, 1)
End If
End Sub