Maar mannen, ik wil het nog eens zeggen, waarom heb ik dat via de link in Excel en niet als ik diezelfde url in Edge ingeef?
Voor wat ik er kan over terugvinden.
Dit komt omdat MS Office de Hlink.dll-component gebruikt om na te gaan of de link een Office-document of iets anders is.
Maar probeer het volgende eens.
Plaatst volgende code in de module van het blad waar de hyperlink zich bevindt.
Private Sub Worksheet_FollowHyperlink(ByVal objLink As Hyperlink)
Application.EnableEvents = False
Dim strAddress As String
strAddress = "explorer " & objLink.TextToDisplay
Dim dblReturn As Double
dblReturn = Shell(strAddress)
Application.EnableEvents = True
End Sub
Klik nadien met de rechtermuisknop op de hyperlink.
Selecteer Hyperlink bewerken -> plaats in document.
Selecteer het juiste blad en in het vak Typ de celverwijzing de cel waar de hyperlink zich bevindt.
Klik op OK.
(opslaan als een excelwerkmap met macro's)
Hopelijk werkt het want een ander idee heb ik ook niet.