Geen reacties in dit onderwerp

[fakie]

Dag Allemaal,

ik heb een stukje code gevonden hoe je een hyperlink in een afspraak (appointment) kunt plaatsen

Code:

Dim objInsp as Object, objDoc as Object
Set objInsp = appointmentItem.GetInspector
Set objDoc = objInsp.WordEditor

link = "http://www.yourlink.com"
linkText = "LinkText"
Set selection = objDoc.Windows(1).Selection
objDoc.Hyperlinks.Add selection.Range, link, "", "", linkText, ""

en die code werk ook wel !

maar het rare is, als ik die afspraak open, vraag hij bij het sluiten of ik dit wil opslaan ?
en als ik dit niet opsla, en heropen de afspraak, is mijn Hyperlink verdwenen ??

als ik het wel ga opslaan, dan blijft de hyperlink bestaan.

ik gebruik dit stuk code voor mijn betalingen in de agenda te schrijven, zodat ik dit kan opvolgen.
en dit werkt dan ook allemaal buiten dat 1ne euvel waar ik geen oplossing voor weet
gemaakt met Outlook 2010


alvast bedankt voor de hulp

Gr. Fakie