hyperlink in VBA script outlook

Status
Niet open voor verdere reacties.

roycke

Gebruiker
Lid geworden
23 sep 2010
Berichten
85
We hebben op t werk een script wat automatisch vanuit excel een email maakt met tekst.
in deze tekst wordt verwezen naar een bestand op de netwerkschijf. Hoe kan ik het script aanpassen zodat het een hyperlink wordt?

xOutMsg = "<p style='font-family:arial;font-size:13;font-style:arial'>" & _
"Beste collega,<br/><br/>" & _
"Gelieve voor <u>" & ['Documentenlijst'!C2] & "</u> controleren of de gegevens kloppen '<i>" & ['Startscherm'!AA8] & "</i>' met casenummer " & ['Startscherm'!AK2] & ". De documentenlijst staat gereed op K:\2. lijsten\gegevens\@Documentenlijsten" & ['Startscherm'!AK2] & " Documentenlijst.xlsm" & ". <br/><br/>" & _
"Alvast dank!<br/><br/>" & _
"Groeten " & ['Keuzemenus'!B9]

Deze regel zal dan de verwijzing moeten worden in de hytperlink:
K:\2. lijsten\gegevens\@Documentenlijsten" & ['Startscherm'!AK2] & " Documentenlijst.xlsm

thankx
 
In twee stappen:
Code:
URLtxt = """K:\2. lijsten\gegevens\@Documentenlijsten" & Sheets("Startscherm").Range("AK2").Value & " Documentenlijst.xlsm"""
URLdsp = "<a href=" & URLtxt & ">" & Replace(URLtxt, Chr(34), "") & "</a>"

Die URLdsp gebruik je dan in je xOutMsg.
 
Laatst bewerkt:
Dankjwel voor je reactie
Ik ben echt een leek.
Heb beide regels erin gezet maar krijg een foutmelding.
Hoe ziet de outmsg dan eruit in zijn geheel?
Wat moet ik precies vervangen door wat?
 
Plaats dan een voorbeeld documentje.
Ik ging er van uit dat je de code in #1 zelf had gemaakt.
 
hoi,
ik heb hem helemaal uitgekleed gezien er veel gegevens instonden welke ik niet "mag" delen. :)
Bijgevoegd de map.

Wederom bedankt voor de effort!
 

Bijlagen

  • map1.xlsm
    17,2 KB · Weergaven: 14
Laatst bewerkt:
Je hebt niks in AK2 staan.
Maar bij deze:
 

Bijlagen

  • roycke.xlsm
    18,8 KB · Weergaven: 19
Laatst bewerkt:
Thankx!!!
Heb de regels in het originele bestand gezet en het werkt perfect
 
nogmaals bedankt. De collega's zijn er blij mee
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan