Mappenname als Link für Outlook
07.01.2010 12:51:37
{Boris}
Hi Leute,
ich erzeuge mit folgenden Codezeilen einen Link, den ich aus der Zwischenablage in eine Outlook-Mail einfügen kann:
Sub link()
Dim newDO As New DataObject
Dim s As String
s = "file://" & ActiveWorkbook.FullName
newDO.SetText s
newDO.PutInClipboard
Set newDO = Nothing
End Sub
In Outlook erscheint dann so was in der Art:file://C:\ABC\Ordner1\Ordner2\Dateiname.xls
Ich möchte den Link aber gerne hinter ein Schlüsselwort legen, so wie es mit html machbar ist:
Guckst Du HIER
Kann man das realisieren? Wenn ja: Wie?
Danke vorab und
Grüße Boris