Application.FollowHyperlink werkt niet

[tomswaelen]

Ik ken bijster weinig van VBA, maar heb me al goed kunnen behelpen met bovenstaande functie, bv. voor het openen van bepaalde Excel-bestanden vanuit knoppen in een formulier.

Nu wil ik nog zo'n knop maken die een vaste URL opent, maar dit werkt niet. Hij geeft syntax error 8.

Ik vermoed dat het aan de URL zelf ligt, want met een normaal adres (bv. http://www.google.be) werkt het perfect.

De URL die ik wil openen, is echter https, en bevat ook een subdomein.

Kan het daaraan liggen?

 

[edmoor]

Over een syntax error kan alleen verteld worden dat de VBA structuur van de betreffende regel niet in orde is. Als je die hier laat zien krijg je beter antwoord.

 

[tomswaelen]

Die is als volgt:

Private Sub URL_Identifin_Click()

    Application.FollowHyperlink "https://www.services.identifin.be"

End Sub

Die website is alleen toegankelijk voor ons bedrijf, dus als je er op klikt, zal je niets krijgen. De URL is echter 100% zeker correct.

 

[edmoor]

Daar lijkt niets aan te mankeren. Wat gebeurt er als je de s uit https weg laat?

 

[tomswaelen]

Dan lukt het ook niet. Dan geeft hij fout 5: de internetserver of proxyserver is niet gevonden.

Raar he

 

[edmoor]

Het is dus niet echt een syntaxfout. Kan je dat adres wel gewoon via Internet Explorer bereiken?

 

[tomswaelen]

Ja hoor, daarom dat ik zeker weet dat die URL klopt. Het enige dat ik nog kan bedenken is dat het aan de computer ligt. Ik zal het morgen eens op mijn werkplaats zelf proberen.

 

[edmoor]

Werkt dit adres ook?

Application.FollowHyperlink "https://login.live.com"

 

[tomswaelen]

Ha, goed idee

Ja, dit werkt. De overblijvende optie is dus dat het aan de PC ligt. Ik zal overmorgen op het werk proberen. Wie weet is die URL alleen toegankelijk vanaf bepaalde IP-adressen of zo.

 

[OctaFish]

Voeg anders eens een web browser object in je formulier in, en kijkt of dat wel werkt.

 

[tomswaelen]

Het lag dus aan de PC