15.02.2018, 16:14
Mit nachfolgendem Skript möchte ich bestimmte Zellen als HTML im Browser öffnen:
Sub Test()
Dim c As Range
For Each c In Selection
If c.Hyperlinks.Count Then
c.Hyperlinks(1).Follow
End If
Next c
End Sub
Funktioniert grundsätzlich gut - aber wenn ich das mit SVERWEIS und HYPERLINK verwenden will funktioniert es nicht mehr.
Habe als Beispiel das XLS angehängt.
Wenn ich B5:C5 markiere funktionert der Button/Makro.
Aber sowohl wenn ich die Link auf B2:C2 bzw. B3:C3 markiere funktioniert es nicht - Warum?
Danke im voraus für Eure Unterstützung!
Sub Test()
Dim c As Range
For Each c In Selection
If c.Hyperlinks.Count Then
c.Hyperlinks(1).Follow
End If
Next c
End Sub
Funktioniert grundsätzlich gut - aber wenn ich das mit SVERWEIS und HYPERLINK verwenden will funktioniert es nicht mehr.
Habe als Beispiel das XLS angehängt.
Wenn ich B5:C5 markiere funktionert der Button/Makro.
Aber sowohl wenn ich die Link auf B2:C2 bzw. B3:C3 markiere funktioniert es nicht - Warum?
Danke im voraus für Eure Unterstützung!