|
Hallo zusammen,
Ich muss des Öfteren in Outlook Links erstellen, die sich aus einem festen und einem variablen Bestandteil zusammensetzen; etwa so: http://mein-fester.link/variableTicketnummer.
Jetzt möchte ich in einer E-Mail die Ticketnummer eintragen, diese markieren und ein Makro ausführen, das mir den obigen Link generiert.
Ich bin auch nicht weit weg, glaube ich, einzig der Link stimmt nicht. Er übernimmt den festen Bestandteil, trägt aber den variablen Teil nicht mit ein.(Link lautet "http://mein-fester.link/")
Vermutlich darf ich das Argument "+ Selection" in der dritten Zeile so nicht verwenden. Was müsste ich stattdessen eintragen? ("& Selcetion" funktioniert auch nicht).
Sub InsertHyperlinkAtCursorPositon()
On Error GoTo finish
strLink = "http://mein-fester.link/" + Selection
strLinkText = Selection
Set objInsp = Application.ActiveInspector
Set objMsg = objInsp.CurrentItem
Set objDoc = objInsp.WordEditor
Set objSel = objDoc.Windows(1).Selection
If objMsg.BodyFormat <> olFormatPlain Then
objDoc.Hyperlinks.Add objSel.Range, strLink, _
"", "", strLinkText, ""
Else
objSel.InsertAfter strLink
End If
finish:
End Sub
Danke Euch und schönen Gruß
CryTee |